Simulating Typing in Perl - Take Two

In my Simulating Typing in Perl post I included a small chunk of perl for varying the typing speed of a fake user. While it works it did have some oddities that were noticeable by a sharp eyed viewer.

Thanks to a pointer from Mark Fowler I’ve now revised the script slightly and included String::KeyboardDistance. This nifty module knows how far away keys on the keyboard are from each other and so helps to smooth the delays out a little; for example the string ‘aaaaa’ is now typed much faster than before (because there is no travel involved) where as ‘qpqpqpq’ will be slower due to the finger movement - although I’m not bothered enough to make repeated sequences faster.

I’ve also uploaded the revised automatic typing script to UnixDaemon.net