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'

    [download]

    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

[reply]
[d/l]
[select]
      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.

      [download]
      ($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,

      [download]
[reply]
[d/l]
[select]

        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

[reply]
[d/l]

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

[reply]

In Section Seekers of Perl Wisdom