#!/usr/local/bin/perl5.005 -Tw

##</code><code>##

print $query->redirect('http://wwwdev.pl.ford.com/L2e/cgi-bin/ebook_insert_2.cgi');

##</code><code>##

$dbh->insert_row('il2e009_bk_review',\%review) or die "Insert failed: $DBI::errstr\n";