open FH, ">somefile" || die "Could not open somefile : $!";

##</code><code>##

   $dbh = DBI->connect('dbi:DBDnamehere:connectstringhere','userid', 'password', {RaiseError => 1});