something like this seems to work and doesn't require hardcoded names. it just grabs the first parent method (in @ISA order) it finds:

sub AUTOLOAD {
    no strict;
    my $METHOD;
    ($METHOD = $AUTOLOAD) =~ s/.*:://;
    foreach my $PARENT (@ISA) {
        if(defined &{$PARENT.'::'.$METHOD}) {
            goto &{$PARENT.'::'.$METHOD}
        }
    }
}
[download]

either this, or use Damian's NEXT module.

cheers,
Aldo

King of Laziness, Wizard of Impatience, Lord of Hubris