my %Q = CGI::Vars();
...
$id_cust=$dbh->Insert("Customer", \%Q) if $Q{pass} eq $Q{confirmpass};