Hi Dana,
> my $dbh=DBI->connect("dbi:DB2:$source", $user, $pass, {RaiseError => 1
> });
Try:
my $dbh = DBI->connect( "dbi:DB2:$source", $user, $pass,
{RaiseError => 1, PrintError => 1, AutoCommit => 1} ) or
die "Unable to connect: " . $DBI::errstr . "\n";
>
> my $sth = $dbh->prepar
Hello,
Why are you not using CGI.pm? Why are you parsing the data yourself?
Doing so is very error prone and you *will* get into trouble.
Try doing the following in your script:
#!/usr/bin/perl -w
use strict;
use CGI qw/param/;
my $name = param('Name');
my $age = param('Age');
my $city = para