$dsn=$config->{'DSN'}; $db = new Win32::ODBC("$dsn"); if (!$db) { print "Cannot connect to DSN $dsn\n"; return 0; } #@updatequeryarray is the array containing the Update statements #for eg.: UPDATE EMPLOYEE SET REMARKS='Test now for Ryan' WHERE EMP_NO='295' AND EMP_JOIN_YEAR='200102' foreach my $query (@updatequeryarray) { $dbgstr.="\n $query"; $db->Sql($query); } $db->Close();