#!/usr/bin/perl -Tw use strict; use CGI ":all"; our $serverName = "blahblahblah"; our $serverDB = "blahblahblah"; our $serverUser = "blahblahblah"; our $serverPass = "blahblahblah"; our $db = "DBI:mysql:$serverDb:$serverName"; print header, "test";