Thanks for your input, thor!
I'm still trying to get a handle on the intricacies of Perl, so all advice is greatly appreciated.
Just to clarify, I can replace use strict 'vars'; with use strict; ?
Could you explain item 2 a bit further, or point me to something that might help me fix it?
Thanks!