...
use lib qw( DIRECTORY_PATH );
use DBI;
use CGI qw(:standard);
...