- or download this
@args = (2,3,first,second);
print @args;
- or download this
foreach ( &func1, &func2 ) { print "Looping : $_"; }
sub func1 { print "func1 called\n"; return "func1 return val\n"; }
sub func2 { print "func2 called\n"; return "func2 return val\n"; }