>Well, you can define the subs anywhere and use references:
>
>sub f {
>    my $value = shift;
>    print "$value\n";
>    }
>
>sub g {
>    my $value = shift;
>    print "\t$value\n";
>    }
>
>my %subs = (
>    f => \&f,
>    g => \&g,
>    );

Now THAT looks good.

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to