I'm using CGI::FormBuilder to input data to a database I've narrowed the problem down 
to the data not being passed to the insert_data subroutine. Either that or i'm not 
processing the data correctly. I snippet of the script it below. I am assuming the 
data returned from the $form-> is a string and not a reference would this assumption 
be correct... thanks in advance.



........<snippet>
if ($form->submitted) {
        # Insert field data into $pro_info and post to insert_data routine
        $pro_info->{apn_number}= $form->field('apn_no');
        $pro_info->{str_no_addr}= $form->field('street_no');
        $pro_info->{str_name_addr} = $form->field('street_name');
        $pro_info->{str_aptno_addr} = $form->field('city');
        $pro_info->{cit_addr} = $form->field('city');
        $pro_info->{sta_addr} = $form->field('state');
        insert_data($pro_info);
        
        print $form->confirm(header => 1);
    } else {
        print $form->render(header => 1);
    }
}


sub insert_data {
    my $pro_info=shift (@_);
    my $rdate=get_date();
    my $dbh=connect_try("rowan","******");
    my $p01=$dbh->quote ($rdate);
    my $p02=$dbh->quote ($pro_info->{apn_number});
    my $p03=$dbh->quote ($pro_info->{str_no_addr});
    my $p04=$dbh->quote ($pro_info->{str_name_addr});
    my $p05=$dbh->quote ($pro_info->{str_aptno_addr});
 .........</snippet>

Reply via email to