shift array : shift « Array « Perl
- Perl
- Array
- shift
shift array
#!/usr/bin/perl -w
use strict;
my @array = ();
unshift @array, "first";
print "Array is now: @array\n";
unshift @array, "second", "third";
print "Array is now: @array\n";
shift @array ;
print "Array is now: @array\n";
Related examples in the same category