Help for this page

Select Code to Download


  1. or download this
    my @array = qw/tiger dog cat/;
delete $array[2];
print scalar @array; # Output is 2
  2. or download this
    my @array = qw/tiger dog cat/;
delete $array[1];
print scalar @array; # Output is 3
delete $array[2];
print scalar @array; # Output is 1
  3. or download this
    my @array = qw/tiger dog cat/;
delete $array[1];
print scalar @array; # Output is 3
splice @array, 2;
print scalar @array; # Output is 2