есть SELECT и вывод из таблицы:

print"<form action='/cgi-bin/zapros.pl' method='post'>";
while (my @row = $sth1->fetchrow_array)
{
print"<input type='text' name='row' value='$row[0]">
print"<input type='text' name='row' value='$row[1]">
print"<input type='text' name='row' value='$row[2]">
print"<input type='text' name='row' value='$row[3]">
}
print</form>
=======
Теперь в zapros.pl надо делать INSERT в другую таблицу:
принимаю данные из формы:
my $cit = new CGI;
my @p=$cit->param('row');
потом:
$query1="insert into table2(field1,field2,field3,field4) values (?,?,?,?)";
$sth1=$dbh->prepare($query1);
$sth1->execute(@p);
========
Ругается, подскажите pls что я делаю неправельно, заранее благодарен