$word = shift; join
$word x 5 . "\n" , shift,
$word x 2, shift, shift;
print haiku('foo ');
If reading aloud, make sure you pronounce "." as "dot" or "stop", "=" as "equals", and don't pronounce commas or semicolons at all.
"\n" can be "slash N", "new line", or "line break".
shiny regexes and rules offered by Perl 6
other CPAN module
by looking at it on my monitor
I print it and I read it in spare time
first I convert it into $FORMAT, then I parse it
I hire someone to do it
using my custom module
I write a brand new language to do the task
on the server where I play as human, XML is forbidden
what is XML?
I speak XML natively
I write a new grammar for Perl 6
some other way
Results (439 votes),