Pop value out of array : pop « Array « Perl






Pop value out of array

   

#!C:/perl/bin

@passengerships = ('T', 'O', 'B');

print "\n\n@passengerships \n\n";  #print the array values

push(@passengerships, "QE2");       # add another ship

print "@passengerships \n";         # print the array values again

$poppedstring = pop(@passengerships);

print "$poppedstring\n";            # This is the value we popped!

print "@passengerships \n";         # print the array values again

   
    
    
  








Related examples in the same category

1.Paper Stacks
2.The pop function pops off the last element of an array and returns it.
3.$s = pop @{[@a]};
4.Push, pop, shift and unshift an array
5.Using Pop to remove element from an array