Help for this page
my $chosen_day = join " ", split /\s+/, "April 1, 2009";
(my $chosen_day = "April 1, 2009") =~ s/\s+/ /;