print "$__FILE__:$__LINE__ stupid debug message!\n"; [download]
In reply to __FILE__ and __LINE__ for Perl? by Plankton