in reply to Win32::ODBC - Update SQL statement
use strict; use DBI; my $db = DBI->connect( $dbasename, $user, $pword ) or die DBI->errstr; my $ss = $db->prepare( 'update employee set remarks = ? where emp_no=? + and emp_join_year = 1001 ' ) or die $db->errstr; while( <DATA> ) { chomp; my( $remark, $emp_no, $join_year ) = split "~~"; $ss->execute( $remark, $emp_no, $join_year ); } $ss->finish; $db->disconnect; __DATA__ Test now for Ryan~~295~~200102 Test later for grinder~~29008~~200005
DBI runs just fine on both Win32 and Unix systems, thus your code will be much more portable (maybe not a big concern) and your skill set will also be more portable. This is of a greater concern, because it means you can ask for more money at your next job!
NB: rough code sketch, no guarentees that it works as advertised.
--
|
|---|