```{index} single: get_code_location (Sub::Identify) ``` ```{index} single: Sub::Identify::get_code_location ``` # get_code_location The file and line where a sub's body begins. ## Synopsis ```perl use Sub::Identify qw(get_code_location); my ($file, $line) = get_code_location(\&Foo::bar); ``` ## What you get back The file the sub was compiled from and the line of its first statement. Nothing for a non-reference, an XSUB, or a sub declared but never defined.