http://www.perlmonks.org?node_id=1212695


in reply to Re^2: [OT]: This does not look like start end (grep vice for)
in thread This does not look like start end

◦ The author doesn't know foreach

In support of which we have, just three lines past the grep statement:

my $i; for ($i=0; $i <= $#a; $i++) { next if _ipcmp($b[$i], $lo) < 0; next if _ipcmp($hi, $a[$i]) < 0; return 1; }
A genuine Perlish for-loop written in C-style. This peculiarity and another grep-loop are found also in cidradd() at line 985. I haven't looked further at the code. OTOH, in the very next function defined after cidrlookup(), cidrvalidate(), we see four kosher Perlish for-loops and a properly (IMHO) used grep, although I must admit there is no guarantee both functions were written by the same programmer. This is doing my nut.


Give a man a fish:  <%-{-{-{-<

Replies are listed 'Best First'.
Re^4: [OT]: This does not look like start end (grep vice for)
by karlgoethebier (Abbot) on Apr 11, 2018 at 17:24 UTC
    "...doing my nut."

    You may invite the author to some code audit. Programmers like mail from the spanish inquisition ;-)

    «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