It's a really lovely day here in Oxford, UK!
#!/usr/bin/perl
# sunshine.pl, by charlie
foreach (@sunny, @march_day) { my $smile++ }
foreach (@cherry, @blossom) { our $world = $lovlier }
foreach (@spring, @daffodil) { local $park = `more beautiful` }
until ($nimbostratus++ and $drizzle++) {sub merge { $us and $once_mo
+re; return }}
tell ($work,$you,$are,$ill);
split /the/, $joint;
seek $comfy,$place,$somewhere and $get . cos($y);
chomp $spring_greens;
pop @a_beer;
write $perl or read $a, $good, $novel;
study; $the_sky and $laze; $daydream or $ponder;
{($let, $the, $good, times, $roll)} while ($the) { s/un/ shin/es };
