test3_t revision 1
4586N/Asub foo {
4586N/A print "in sub foo\n";
4586N/A exit(0);
4586N/A bar();
}
sub bar {
print "in sub bar\n";
}
sub baz {
print "in sub baz\n";
bar();
foo();
}
bar();
baz();
foo();