...well I am a bit of a perl newbie and this is my first try at writing code that other people will use.

I'd much rather use something like Doodle,

Now had I known that existed I would not have wrote this.