Select Code to Download

<87>Nov 18 09:43:43 rotechili.localdomain sudo[568]: pam_systemd(sudo:
+session): Cannot create session: Already running in a session
<30>Nov 18 09:43:45 rotechili.localdomain dbus-daemon[1270]: [system] 
+Successfully activated service 'org.freedesktop.locale1'
<13>Nov 18 09:44:14 rotechili.localdomain [RPM][708]: Transaction ID 5
+bf1265e finished: 0
<86>Nov 18 09:44:19 rotechili.localdomain sudo[568]: pam_unix(sudo:ses
+sion): session closed for user root

cat 00 00 > 01
cat 01 01 > 02
...
cat 17 17 > 18
cat 18 18 > 19
cat 19 19 > 20

use 5.028;
use strictures;
...
while ($str =~ /$pattern/g) {
    () = %+; # do something useful with the results
};

$ perl -E'for (10..20) { print "file $_: "; system "time perl logparse
+r perlio $_" }'
file 10: 0.06user 0.00system 0:00.07elapsed 98%CPU (0avgtext+0avgdata 
+11480maxresident)k
...
0inputs+0outputs (0major+59994minor)pagefaults 0swaps
file 20: 32.82user 0.22system 0:33.08elapsed 99%CPU (0avgtext+0avgdata
+ 942436maxresident)k
0inputs+0outputs (0major+121878minor)pagefaults 0swaps

$ perl -E'for (10..20) { print "file $_: "; system "time perl logparse
+r sysmmap $_" }'
file 10: 0.16user 0.00system 0:00.16elapsed 99%CPU (0avgtext+0avgdata 
+12060maxresident)k
...
file 14: 96.97user 0.02system 1:37.10elapsed 99%CPU (0avgtext+0avgdata
+ 25456maxresident)k
0inputs+0outputs (0major+2381minor)pagefaults 0swaps
file 15: ^Z