Yes the program I posted was just a test program there is the head of the program i'm working with now.

 [root@chelsea /]# head /var/www/vhosts/domain.com/subdomains/secure/c
+gi-bin/hrs/step1.pl
#!/usr/bin/perl -w
use strict;
use CGI;
use CGI::Carp qw { fatalsToBrowser set_message};
use DBI;
use Mysql::Statement qw {fetchhash};
use HTML::Template;
use lib './';
use HRS;
use Data::Dumper;
[download]