foo(1,2); bar(1,2); sub foo { print pop; print pop } sub bar { print shift; print shift }