Are you looking for advice on how one would write this or looking for someone to do it for you? Why would want a Perl equivalent if there is already a freeware version?