Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked
 
PerlMonks  

The golf course looks great, my swing feels good, I like my chances (Part II)

by eyepopslikeamosquito (Canon)
on Apr 30, 2009 at 07:31 UTC ( #761053=perlmeditation: print w/ replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    p=t=0
    $<.each_byte{|c|n=10**(238%c%19%4)>>-c%29%2;p<n&&t-=2*p;t+=p=n}
    p t
    
  2. or download this
    n=t=0
    t+=n-n*(n<(n=10**(238%c%19%4)>>-c%29%2)?2:0)while c=getc
    p t
    
  3. or download this
    n=t=0
    t+=n-n*(n<(n=10**(238%C%19%4)>>-C%29%2)?2:0)while C=getc
    p t
    
  4. or download this
    n=t=0;t+=n.*1+n<=>n=10**(238%C%19%4)>>-C%29%2while C=getc;p t
    
  5. or download this
    t=p=0
    for c in map(ord,raw_input()):n=10**(84169%c%5)>>-c%29%2;t+=n-2*p*(p<n
    +);p=n
    print t
    
  6. or download this
    t=p=0
    for c in raw_input():x=84169%ord(c);n=10**(x%5)>>x/4%2;t+=n-2*p*(p<n);
    +p=n
    print t
    
  7. or download this
    t=p=0
    for c in map(hash,raw_input()):n=10**(c/619%4)>>c%8/5;t+=n-2*p*(p<n);p
    +=n
    print t
    
  8. or download this
    t=p=0
    for r in raw_input():n=10**(205558%ord(r)%7)%9995;t+=n-2*p%n;p=n
    print t
    
  9. or download this
    n=10**(hash(r+"*N_")%9)%2857;t+=n-2*p%n;p=n
    n=10**(hash(r+"@M4")%7)%9995;t+=n-2*p%n;p=n
    n=10**(hash(r*37509)%7)%9995;t+=n-2*p%n;p=n
    n=10**"IXCMVLD".find(r)%9995;t+=n-2*p%n;p=n
    n=10**(494254%ord(r)/9)%4999;t+=n/2-p%n;p=n
    
  10. or download this
    t=p=1
    
  11. or download this
    n=1;$.+=n/2-n%n=10**(494254%C/9)%4999while C=getc;p$.
    
  12. or download this
      1st  53  eyepopslikeamosquito  Ruby
      2nd  55  primo                 Ruby
    ...
      8th  59  kounoike              Perl
      9th  60  robin                 Perl
     10th  61  arpad                 Perl
    
  13. or download this
      1st  55  eyepopslikeamosquito
      2nd  58  ySas
    ...
     38th  100 k12u
     39th  102 duranain
     40th  104 sphx95
    
  14. or download this
      1st  53  eyepopslikeamosquito
      2nd  55  primo
    ...
      8th  73  yvl
      9th  73  bitsweat
     10th  76  ozy4dm
    
  15. or download this
      1st  78  Mark Byers
      2nd  78  eyepopslikeamosquito
    ...
      8th  85  hiro.suzuki
      9th  91  mick
     10th  91  gtalpo
    
  16. or download this
      1st  70  eyepopslikeamosquito
      2nd  89  hiro.suzuki
    ...
      8th  91  rollercoaster375
      9th  92  El Hombre Gris
     10th  92  morten
    
  17. or download this
    hallvabo              Python    79 ->  72
    hendrik               Python    94 ->  90
    ...
    eyepopslikeamosquito  PHP       70 ->  68
    Kalindor              PHP          ->  93
    tomatoring            Python       -> 295
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlmeditation [id://761053]
Approved by Corion
Front-paged by grinder
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (6)
As of 2014-09-16 04:44 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My favorite cookbook is:










    Results (156 votes), past polls