in reply to A better non-existant string...
# perl -MO=Deparse,-p -we 'print "Eek\n" if (shift ne "");' ((shift(@ARGV) ne '') and print("Eek\n")); -e syntax OK # perl -MO=Deparse,-p -we "print 'Eek\n' if (shift ne '');" ((shift(@ARGV) ne '') and print('Eek\\n')); -e syntax OK
It would seem that perl is smart enough at compile time to fix that up for you, just like you would expect.
--
$you = new YOU;
honk() if $you->love(perl)
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: Re: A better non-existant string...
by lzcd (Pilgrim) on Jan 23, 2001 at 06:50 UTC |