Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
PerlMonks  

Re^2: Unexplained benchmark when using chop vs. chomp (or neither)

by BrowserUk (Patriarch)
on Mar 08, 2018 at 10:30 UTC ( [id://1210506]=note: print w/replies, xml ) Need Help??


in reply to Re: Unexplained benchmark when using chop vs. chomp (or neither)
in thread Unexplained benchmark when using chop vs. chomp (or neither)

Please show us 4 to 6 lines of Perl code that compiles, runs and does something useful. Go on. Surprise me.


With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday'
Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
"Science is about questioning the status quo. Questioning authority". The enemy of (IT) success is complexity.
In the absence of evidence, opinion is indistinguishable from prejudice. Suck that fhit
  • Comment on Re^2: Unexplained benchmark when using chop vs. chomp (or neither)

Replies are listed 'Best First'.
Re^3: Unexplained benchmark when using chop vs. chomp (or neither)
by karlgoethebier (Abbot) on Mar 08, 2018 at 12:47 UTC
    "...4 to 6 lines of Perl code that compiles..."

    Mostly it is just a question of the his comments:

    perl -E 'say qq(I “just missed it,” I apologize in advance); // svc'

    Best regards, Karl

    «The Crux of the Biscuit is the Apostrophe»

    perl -MCrypt::CBC -E 'say Crypt::CBC->new(-key=>'kgb',-cipher=>"Blowfish")->decrypt_hex($ENV{KARL});'Help

      Bareword found where operator expected at -e line 1, near "// svc" (Missing operator before svc?) syntax error at -e line 1, near "// svc " Execution of -e aborted due to compilation errors.
      ($q=q:Sq=~/;[c](.)(.)/;chr(-||-|5+lengthSq)`"S|oS2"`map{chr |+ord }map{substrSq`S_+|`|}3E|-|`7**2-3:)=~y+S|`+$1,++print+eval$q,q,a,

        Yes. This i meant. Good observed. Best regards, Karl

        «The Crux of the Biscuit is the Apostrophe»

        perl -MCrypt::CBC -E 'say Crypt::CBC->new(-key=>'kgb',-cipher=>"Blowfish")->decrypt_hex($ENV{KARL});'Help

        ...and some say Perl is based on C. Meh ;)

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others having an uproarious good time at the Monastery: (12)
As of 2024-04-23 14:55 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found