http://www.perlmonks.org?node_id=792224


in reply to How would you rewrite this?

my $chosen_day = join " ", split /\s+/, "April 1, 2009";
or
(my $chosen_day = "April 1, 2009") =~ s/\s+/ /;

-- Randal L. Schwartz, Perl hacker

The key words "MUST", "MUST NOT", "REQUIRED", "SHALL", "SHALL NOT", "SHOULD", "SHOULD NOT", "RECOMMENDED", "MAY", and "OPTIONAL" in this document are to be interpreted as described in RFC 2119.