[Omaha.pm] ignoring undefined subroutines

Jay Hannah jay at jays.net
Tue Sep 7 15:26:26 CDT 2004


Terry wrote:
> I want to ignore undefined subroutines.  Right now, my collection of
> text ( not worthy of being called a perl script ) calls subroutines
> but I want it to NOT die when it comes across a subroutine that is not
> defined.  How can I do this?   For example:
>
> &{"header_$who"};
>
> if $who is not defined or contains a goofy value, my script dies, I do
> not want this.

use vars qw( $AUTOLOAD );
&{"header_$who"};

sub AUTOLOAD {
    print "No such sub $AUTOLOAD\n";
}

HTH,

j



More information about the Omaha-pm mailing list