Re^2: You've just spilled something on your tie at lunch... Do you:

Hmm.. Your sig:

($$<<$$=>$$<=>$$<=$$>>$$) always returns 1. :-)
[download]

Seems like you're right

perl -le 'print +($$<<$$=>$$<=>$$<=$$>>$$)'
26088570881
[download]

for very large values of 1 :-P

--shmem

_($_=" "x(1<<5)."?\n".q·/)Oo.  G°\        /
                              /\_¯/(q    /
----------------------------  \__(m.====·.(_("always off the crowd"))."·
");sub _{s./.($e="'Itrs `mnsgdq Gdbj O`qkdq")=~y/"-y/#-z/;$e.e && print}

Comment on Re^2: You've just spilled something on your tie at lunch... Do you: Select or Download Code

Replies are listed 'Best First'.
Re^3: You've just spilled something on your tie at lunch... Do you: by ysth (Canon) on Sep 23, 2007 at 23:04 UTC
It always returns 1, and sometimes returns other numbers too, depending on how you invoke it.	[reply]
Re^4: You've just spilled something on your tie at lunch... Do you: by shmem (Chancellor) on Sep 23, 2007 at 23:14 UTC
I saw the fat comma in that expression, but dinn' think much further... `perl -le '%h = ($$<<$$=>$$<=>$$<=$$>>$$); print $h{$_} for keys %h' 1` [download] Thank you. --shmem _($_=" "x(1<<5)."?\n".q·/)Oo. G°\ / /\_¯/(q / ---------------------------- \__(m.====·.(_("always off the crowd"))."· ");sub _{s./.($e="'Itrs `mnsgdq Gdbj O`qkdq")=~y/"-y/#-z/;$e.e && print}	[reply] [d/l]
Re^3: You've just spilled something on your tie at lunch... Do you: by wolfger (Deacon) on Sep 28, 2007 at 19:00 UTC
He didn't say it only returned a single 1, did he? ;-) It returns a whole lot of 1's, bundled together for your convenience. -- Nothing to see here. Move along.	[reply] [d/l]


Syntactic Confectionery Delight
	PerlMonks