DBI->connect using ‘old-style’ syntax is deprecated

Hi

Please help I'm getting this error on a perl script

DBI->connect using 'old-style' syntax is deprecated and will be an error in future versions at /home/dbadmin/perl/adm_audit_mhs line 43

$dbh = DBI->connect('xe', 'ops$dbadmin', 'm00nwalk', 'Oracle') or die $DBI::errstr; (this is line 43)

Thank you in advance