I'm reading the book Programming the Perl DBI to start work with
databases. The DBI portion I'm getting OK, but I find the reference
here to @$ confusing. (This code is based from the book.)
my $sth1 = $dbh->prepare("select 'SCM_ORDERS_OUT', message_index,
message_no, message_event, time_stamp, data from log");
$sth1->execute();
my @stash;
while ($array_ref = $sth1->fetchrow_arrayref) {
push @stash, [ @$array_ref ]; ##copy array contents
}
###dump stash contents
foreach $array_ref ( @stash ) {
print "Row: @$array_ref\n";
}
The rows print out fine, so it "works", but I don't understand how. I
need to be able to work with specific items in the output, such as the
column "data". How would I reference it, using this example?
Peter Link
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
