time ./move_to_next.pl > /dev/null

Perl:
real    0m0.231s
user    0m0.116s
sys     0m0.116s

Python:
real    0m0.099s
user    0m0.078s
sys     0m0.018s