$ perl dietest.pl 
Bla at dietest.pl line 14.