file.pl
20: log_error( "a error msg", $level )

##</code><code>##

print STDERR "a error msg:" . __FILE__ .  __LINE__ 
if $level >= THRESHOLD;