Beefy Boxes and Bandwidth Generously Provided by pair Networks
Keep It Simple, Stupid
 
PerlMonks  

(jeffa) Re: Predicting the end of times...

by jeffa (Chancellor)
on Jul 06, 2002 at 17:19 UTC ( #179851=note: print w/ replies, xml ) Need Help??


in reply to Predicting the end of times...

Well, if we are all going to hell in a handbasket, i am going with a golfed one-liner!!

perl -le'$x+=ord,print"$_ - ",ord for split//,HOLYBIBLE;print"Total: $ +x"'

jeffa

jeffa suddenly notices cumulonimbus clouds forming over him "uh-oh"


Comment on (jeffa) Re: Predicting the end of times...
Download Code
Re: (jeffa) Re: Predicting the end of times...
by AcidHawk (Vicar) on Jul 08, 2002 at 14:31 UTC
    Why do I get this when I try your one liner..?
    Can't find string terminator "'" anywhere before EOF at -e line 1.
    -----
    Of all the things I've lost in my life, its my mind I miss the most.
      Are you running this on Win32? If so, try this one (which will not work in a Unix shell):
      perl -le"$x+=ord,print qq|$_ - |,ord for split//,HOLYBIBLE;print qq|To +tal: $x|"
      The problem is that Win32 wants the whole expression wrapped in double quotes (not single quotes), and Unix shells will interpolate any tokens in double quotes before Perl gets a chance to execute. This results in Yet Another Platform Dependance for Perl one-liners that contain dollar signs. You can escape the quotes, but that gets ugly (uglier?) real quick. For example, this should work on both platforms (but since i don't have a Win32 box available, i can't test it on that platform):
      perl -le"\$x+=ord,print\"\$_ - \",ord for split//,HOLYBIBLE;print\"Tot +al: \$x\""
      Update - nope, the previous one only works on Unix shells, Win32 doesn't need (or like) the escaped dollar signs. Thanks for testing this for me, BlueBlazerRegular and BrowserUk. :)

      jeffa

      L-LL-L--L-LL-L--L-LL-L--
      -R--R-RR-R--R-RR-R--R-RR
      B--B--B--B--B--B--B--B--
      H---H---H---H---H---H---
      (the triplet paradiddle with high-hat)
      

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://179851]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others cooling their heels in the Monastery: (3)
As of 2015-07-05 06:06 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (60 votes), past polls