# Each subroutine has its own copy of @_, #!/usr/bin/perl use warnings; use strict; first(1,2,3); sub first { print "In first, arguments are @_\n"; second(4,5,6); print "Back in first, arguments are @_\n"; } sub second { print "In second, arguments are @_\n"; }