Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses

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

by jeffa (Bishop)
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 suddenly notices cumulonimbus clouds forming over him "uh-oh"

Replies are listed 'Best First'.
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. :)


      (the triplet paradiddle with high-hat)

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others chilling in the Monastery: (7)
As of 2019-11-19 00:05 GMT
Find Nodes?
    Voting Booth?
    Strict and warnings: which comes first?

    Results (93 votes). Check out past polls.