- or download this
my %month_hash = (
'1' => 'January',
...
'3' => 'March',
'4' => 'April'
);
- or download this
my @order = (1 .. 4);
- or download this
my @months = @month_hash{@order};
print $_,$/ for @months;
- or download this
delete $month_hash{3};
my @months = @month_hash{@order};
print $_,$/ for @months;