#!c:\perl\bin\perl.exe -w
# Datenbank -- Zelleninhalt verändern

use strict;
use warnings;
use Win32::ODBC;

my $db = new Win32::ODBC('test') or Win32::ODBC::DumpError();
$db->Sql("UPDATE Tab2 SET SP2='444333' where Sp1 = '333'") or  $db->DumpError();

$db->Close() or $db->DumpError();