after all it's strict compliant!

But not -w :)

$ perl -w
#!/usr/bin/perl
#   Haiku
use strict;

my (@tention, $uddenly);
s eems to fade
while (s ilently a kid cries);
Use of uninitialized value in substitution (s///) at - line 7.
$
[download]

Hehe... Just kidding, it's very nice. ++!
--
Mike