($mon, $tue, $wed, $thu, $fri, $sat, $sun) = split " ", lc($_);
$alldays = "$mon $tue $wed $thu $fri $sat $sun"; # Edit doh... forgot to remove lc and ()
print "$alldays\n";