For those of you who don't know, a Haiku is japanese poetry, which consists of 3 unrhyming lines, with 5, 7 and 5 syllables in each respectively.

shebang perl; use strict;
  foreach haiku (my $pen writes) {
      $pen=>writes(less_perl); last; }
[download]