Beefy Boxes and Bandwidth Generously Provided by pair Networks
go ahead... be a heretic
 
PerlMonks  

My favorite number perled

by jclovs (Sexton)
on Dec 14, 2001 at 14:19 UTC ( [id://131916]=obfuscated: print w/replies, xml ) Need Help??

My first JAPH.
#!/usr/bin/perl -w undef$/;$_=<DATA>;s+\s++g;s$(8|0)$ $g;@_=split;for(0..$#__){undef$__}f +or(0..$#_) {if(!(length($_[$_])-1)){$__[$_[$_]]=$_;}}if(!(shift @__)){for(@__){pr +int chr;}} __DATA__ 85586967614334 0032453043574636 599933 +2330526173 62821583623411 1173462495026886 646789 +2547408318 89794307322962 3911592652435243 238138 +3215474732 08853829285445 0758529400771526 587199 +3836016082 9133980 4521 1262 + 05491114 0228418 1929 12 9340 + 75249419 8268438 2746 34 7417 + 72034592 1189654 8438 2985 + 47943938 7989184 6594942741680576 359662 +5115665025 9520668 9406574530353550 942696 +5011011185 7363954 7769538132458069 546196 +5534784548 5404671 4875016508776268 648125 +7599081492 7824842 7252 6284 654921 +73 0213124 4752 56 4843 021069 +45 8316459 7316 78 2423 780225 +88 1471236 9018 3178 333874 +23 5132382302969830 3251863465853443 378857 +7095311153 2224389777766721 1587511761923753 065556 +4308572805 3466202304202404 2914589463732445 157849 +6395620205 6424427725515478 3531949393432917 336867 +6826453788 5123480975304076112656432722844412746776539345130754536523339695185926 +4036281274 8318561199022354125332614246399470123302423269587157320059495182346280 +8494370032 3069004754876024061427822340635124657965354231564579651324564796544313 +5462135447
For an reason why 182 is my favorite number, it is because it is the ceiling(sqrt(the largest signed int on a 16 bit system))which somehow became my standard error code for my subroutines when I was learning C(long, long, ago).

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: obfuscated [id://131916]
Approved by root
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others meditating upon the Monastery: (3)
As of 2024-03-29 02:18 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found