Help for this page

Select Code to Download


  1. or download this
    use strict;
    
    my @values = qw(mon10 mon11 mon12 wed15 wed16 wed17 wed18 mon9 mon10 m
    +on11);
    @values = sort keys %{({ map { $_ => 1} @values })};
    
  2. or download this
    my %uniq = map { $_ => 1} @values;
    @values = sort keys %uniq;