I'll fix this today when I get access to a Windows box. Meanwhile, if you want to try the program, you can just hardcode the value of $author by changing:

my $userid= POSIX::cuserid();
my $author = (getpwnam($userid))[6];
[download]

to

my $author = "Your Name Here";
[download]

The trick for getting the 'real name' of a user on unix uses the user id with cuserid() and the corresponding entry in /etc/passwd with getpwnam(). It will be interesting to figure out how to get this information from a Windows box.

Thanks!

It should work perfectly the first time! - toma