Perl haiku:
1, 2 or more(‘to’), tie $her, $up and bind $her, $up; sub for ({ each %2; do {} };)
by Clinton Pierce.
Obfuscated perl poetry:
$_=open (and_, “waiting”)==0?‘’: system (‘clear’); @hoping=; $waiting =$i{m}{‘patiently’ and ‘’}=‘breathlessly’; foreach (human (‘contact’)){ $just= “$waiting to ”=~/^breathe?/ &&‘forever’ ?“waiting ------ ”.(“but when w$e”=~/ do/, join( ‘together’,())): ($o=‘ur’. crypt(‘ic’, “words confuse”), s/[^ta-y! \n$o: ]//go,$_); $i{m}=print($ed? ‘indelibly’: ($waiting= $just)). “disappoints”;} sub human {$e=“motionally now: done with”; @hoping;} $_=“done with $waiting the solution” eq’uals’? ‘this’: ‘eyes’ .close($d =and_); $i{mmerse}=“$d in”; bless\$ed; sleep;
by Damon Harper.