Have a Cigar

[JaK]

My first beauty perl poetry, I think... and u? :) Send me comments!

#!/usr/bin/perl
#Have a cigar! ;) Dedicated to my friends.
#by J. "JaK" Prendin, [e-mail]

open (MyPacket,"ITakeACigar");
close(MyPacket);
BEGIN(toSmoke);
open (MyLighter);
$fire=getc MyLighter;
getc $moke;
close(MyLighter);
$life=$moke;
study $life;
END(toSmoke);
goto work;
work:

Janitored by ybiC: Balanced <code> tags around code