http://www.perlmonks.org?node_id=1216310


in reply to I need to get this code to perl

Sure, here you go, perlfaq, perlintro, DBI, CGI, LWP