Help for this page
Select Code to Download
Select
or
download this
my($scalar, @restofarray) = @array;
Select
or
download this
my $scalar = shift(@array);