Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question:
foreach $row (@$rows) {
%hrec = (
product_id => $row->{'product_id'},
product_sku => $row->{'product_sku'},
size_id => $row->{'size_id'},
size_name => $row->{'size_name'},
price => $row->{'price'},
product_name => $row->{'product_name'}
);
$num = push @products, \%hrec;
}
foreach $product(@products) {
print "Product SKU: $product->{product_sku}\n";
print "Size: ";
foreach $size(@{$product->{size_id}}){
print "$size ";
}
print "\n";
print "Price Each: \$$product->{price}\n";
}
exit;
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: Needs new memory location
by davorg (Chancellor) on Aug 21, 2000 at 19:11 UTC | |
by Anonymous Monk on Aug 21, 2000 at 19:56 UTC | |
|
Re (tilly) 1: Needs new memory location
by tilly (Archbishop) on Aug 21, 2000 at 19:13 UTC |