path: root/lines-per-second

#!/bin/bash

# this is really just a snippet to be copied when needed

exec perl -e 'while (<>) {$l++;if (time > $e) {$e=time;print "$l\n";$l=0}}'