Do you know where your variables are? PerlMonks

### Re: Camel Time

by belg4mit (Prior)
 on Aug 16, 2002 at 02:15 UTC ( #190578=note: print w/replies, xml ) Need Help??

Spiffy, but in your explanation you neglected to say at what time(s) the hands can be read (clockwise of course) as a sentence :-P

UPDATE: This ever so slightly tweaked version lets you see the *cough* camel *cough* as well :-D

```#!perl  -w
use strict;
\$_='
\$,=\$/;\$|=@_
=split//,"Justan                ot
+he
rPerl.hacker";\$/=\'\$~=         (local
+ tim
e)[\$.]*(\$.==0||\$.==1?1:5);s      ubstr(\$
+_,eval
\\\'\$^=\$~*2*atan2(1,1)/15;int(-  cos(\$^) *
+(\$=+
1)+11.5)*25+int(sin(\$^)*(\$=+1)+12.5)\\\',1
+,
\$_[\$=+(11,4,0)[\$.]])\';do{\$_=("."x287).
"#"."."x287;for\$=(0..10){\$.=0;eval\$/;
\$=<7&&(\$.=1,e         val\$/);\$=<4&
&(\$.=2,ev             al\$/);}p
rint(p               ack("
c3  ",                27,9
1,  72                ),(/
.{  25                }/g)
,s  ca                lar(
lo   cal              time)
);}   whil            e(slee

p(1))';print;s/\s+//g;eval

--
perl -pew "s/\b;([mnst])/'\$1/g"

Create A New User
Node Status?
node history
Node Type: note [id://190578]
help
Chatterbox?
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others avoiding work at the Monastery: (2)
As of 2018-05-28 03:36 GMT
Sections?
Information?
Find Nodes?
Leftovers?
Voting Booth?
World peace can best be achieved by:

Results (199 votes). Check out past polls.

Notices?