that snippet of code sets the userid and groupid ... concepts that
are foreign to a lot of windows systems. It's not so much that
ActivePerl doesn't implement getpwnam (and getgrnam) but that
there's no need for it on a windows platform. Exactly what is the
script doing with $uid and $gid?