Perl shift Function
Advertisements
Description
This function returns the first value in an array, deleting it and shifting the elements of the array list to the left by one. If ARRAY is not specified, shifts the @_ array within a subroutine, or @ARGV otherwise. shift is essentially identical to pop, except values are taken from the start of the array instead of the end.
Syntax
Following is the simple syntax for this function −
shift ( [ARRAY] ) shift
Return Value
This function returns undef if the array is empty else returns first element in array.
Example
Following is the example code showing its basic usage −
#!/usr/bin/perl
@array = (1..5);
while ($element = shift(@array)) {
print("$element - ");
}
print("The End\n");
When above code is executed, it produces the following result −
1 - 2 - 3 - 4 - 5 - The End
Advertisements
