On Wed, 2004-04-21 at 15:08, Smylers wrote:
> Craig S. Cottingham writes:
> > On Mon, 2004-04-19 at 14:51, Yanick wrote:
> > > perl -e'print$_=$ARGV[1],(pop)x-(tr|||c-shift)' 10 abc d
> > perl -e'print$_=$ARGV[1],(pop)x-(y|||c-shift)' 10 abc d
> 
> Using pop for all 3 params:
> 
>   perl -e'$:=pop;print$_=pop,$:x-(y|||c-pop)' 10 abc d

Apparently, Windows doesn't like using '|' as the delimiter for y, so we
get to throw in a measure of obfuscation:

perl -e'$:=pop;print$_=pop,$:x-(y---c-pop)' 10 abc d

I tried using both 'y' and 'c' as the delimiter, but they both produce
the same, incorrect results (ten 'd's after 'abc' instead of seven).

-- 
Craig S. Cottingham
[EMAIL PROTECTED]

Reply via email to