Select Code to Download

local $" = "\n";
my @array = ( 1 .. 5 );
...
    print "Removed value $item from the front of \@array\n";
}
print "Deleted array content:\n@a\n";