perl - A script that can tell how many lines per second -


I do not know how and how to explain it, but I am trying to tell that in per second list How many rows are included.

"text">

line-counter.pl

  #! / Bin / perl my $ last_time = time (); My $ line_count = 0; While (<< (time ()> $ last_time) {$ last_time = time (); Print line_count "\ N"; $ Line_count = 0; } $ Line_count ++; }  

Usage: tail -f /the/file.log | Perl -w line-counter.pl


Comments

Popular posts from this blog

ios - How do I use CFArrayRef in Swift? -

eclipse plugin - Run java code error: Workspace is closed -

c - Error on building source code in VC 6 -