#! perl -slw
use strict;
use LOLCat;

LOLCat->new->cheeseburger('KTHNXBYE');

__END__
c:\test>t-pudu.pl
NOM NOM