push ( @First, 1); push ( @First, 2); push ( @First, 3); $Result = pop(@First); print "$Result"; $Result = pop(@First); print "$Result"; $Result = pop(@First); print "$Result\n"; ==> 3 2 1