sub foo () { ... } sub bar { ... } #### print ($_[0]);