#!/usr/bin/perl

# poem.pl
#
# Please send corrections, suggestions for improvement, comments etc. to
# chandra@ee.uwa.edu.au
#
# This script is purposely without pragmata.
# It is a tongue-in-cheek attempt at Perl poetry and is a summary
# of the article Perl Pitfalls and Precautions.

pragmata;
scalar (@ARGV) or list; 
chomp;
sub ref{}
backtick;
system and shell;
s/perl -pi -e one-liners are as easy as pie?/y : n/;