$ perl a.pl
Moo!