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