k41d3n
asked on
MySQL query error
I have this query set up to print out to a file. In the foreach section, I am under the impression that it will go through each row of the database and print out the data that I have in the file print. It just prints the same record over 6 times, which is the number of COLUMS I have in the database:
my $q2 = qq{ SELECT * FROM dejagnu };
my $rs2 = $dbh->prepare ( $q2 );
$rs2->execute();
my @dejadata2 = @{$rs2->{NAME}};
while (my $ref5 = $rs2->fetchrow_hashref() )
{
#write all the parameters to the .bashrc file
open(fileOUT, ">.dejagnurc") || die "Could not open configuration file";
flock(fileOUT, 2);
print fileOUT "global env\n\n";
print fileOUT "\# Flush out \"/data_logging\" or \"/rms\" for the PRODUCT env variable.\n";
#dynamically changed variables
foreach (@dejadata2) {
print fileOUT "$ref5->{deviceType} {\n";
print fileOUT " set dut(ip) \"$ref5->{ip}\"\n";
print fileOUT " set dut(subnet) \"$ref5->{subnet}\"\n";
print fileOUT " set dut(gateway) \"$ref5->{gateway}\"\n";
print fileOUT " set upsType \"$ref5->{upsType}\"\n";
print fileOUT "}\n";
}
close (fileOUT);
my $q2 = qq{ SELECT * FROM dejagnu };
my $rs2 = $dbh->prepare ( $q2 );
$rs2->execute();
my @dejadata2 = @{$rs2->{NAME}};
while (my $ref5 = $rs2->fetchrow_hashref() )
{
#write all the parameters to the .bashrc file
open(fileOUT, ">.dejagnurc") || die "Could not open configuration file";
flock(fileOUT, 2);
print fileOUT "global env\n\n";
print fileOUT "\# Flush out \"/data_logging\" or \"/rms\" for the PRODUCT env variable.\n";
#dynamically changed variables
foreach (@dejadata2) {
print fileOUT "$ref5->{deviceType} {\n";
print fileOUT " set dut(ip) \"$ref5->{ip}\"\n";
print fileOUT " set dut(subnet) \"$ref5->{subnet}\"\n";
print fileOUT " set dut(gateway) \"$ref5->{gateway}\"\n";
print fileOUT " set upsType \"$ref5->{upsType}\"\n";
print fileOUT "}\n";
}
close (fileOUT);
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
That was a quick one again :-)
I think you just made me pass ozo in the yearly Top 15, thanks! :-D
I think you just made me pass ozo in the yearly Top 15, thanks! :-D
ASKER