foo( "a" );

sub foo {
    eval { goto &foo2; };
}

sub foo2 {
    print "foo2 called with @_\n";
}