sub AUTOLOAD {
    my $func = $AUTOLOAD;
    die "Can't locate $func" if ! -f "$func.pl";
    eval "require $func.pl";    
    die $@ if $@;
    goto &$func;
}