Replace the commented lines with:
Method 1 (with counter):
@array_data = ();
...
$array_data[$counter++] = @row;
Method 2 (without counter):
@array_data = (); # initialize it
$array_data[$#array_data] = @row; # put the array into the array
Method 3 (with
Instead of using arrays, try using hashes directly:
...
while (my $hash = $sth-fetchrow_hashref)
{
while (my ($key, $value) = each(%{$hash}))
{
print $key = $value\n;
}
}
...
On Thu, 2003-07-10 at 04:58, Rudy Metzger wrote:
Replace the commented lines