$datainput=DBI->connect
("DBI:mysql:database=DATA;host=localhost......)
foreach ($hash1($key1))
{
foreach ($hash2($key2))
{
if $hash1($key1)==$hash2($key2)
{
$data1=$hash2($value1)-$hash1($key2);
$data2=$hash2 ($value2)-$hash2(key2);
$datainput->do("INSERT INTO DATA VALUES($data1, $data2)
}
}
}
$datainput->disconnect();
exit;