Its a snippet of a subroutine timed using the Benchmark module ie
use Benchmark;
my $interval = timeit(1, \&wibble);
where wibble is my subroutine. I'm also MD5 hashing the input and output files before and after my subroutine is called to make sure I'm not outputting garbage and also checking filesize.
Anyway, just by watching a clock I can tell the difference between nearly 10 mins execution and 1.5 mins.
Can anyone rewrite the above code to increase performance by a factor of 5 or more ?
Obviously if the two approches were in the same ballpark I wouldn't bother with the sysread stuff - I'm not trying to complicate things on purpose.
| [reply] |