use Carp; croak "stupid debug message"; [download]
In reply to Re: Re: __FILE__ and __LINE__ for Perl? (caller) by drewhead in thread __FILE__ and __LINE__ for Perl? by Plankton