time perl sp.pl file1 file2 > /dev/null
real    0m0.448s
user    0m0.448s
sys     0m0.000s