use warnings; use strict; my $code = { "StatusCode"=> 0, "StatusInfo"=> "Command Processed OK", "PageNumber"=> 0, "TotalPageCount"=> 1, "TotalProductCount"=> 1, "PageProductCount"=> 1, "Products"=> [ { "BaseProductId"=> "50043662", "EANBarcode"=> "5000175411118", "CheaperAlternativeProductId"=> "", "HealthierAlternativeProductId"=> "", "ImagePath"=> "http=>//img.tesco.com/Groceries/pi/118/5000175411118/ID +Shot_90x90.jpg", "MaximumPurchaseQuantity"=> 99, "Name"=> "Oxo 12 Chicken Stock Cubes 71G", "OfferPromotion"=> "Price Drop Was £1.13 Now £1.00 ", "OfferValidity"=> "valid from 30/7/2012 until 9/9/2012", "OfferLabelImagePath"=> "http=>//www.tesco.com/Groceries/UIAssets/I/Si +tes/Retail/Superstore/Online/Product/pos/save.png", "Price"=> 1, "PriceDescription"=> "£1.41 each", "ProductId"=> "254881114", "ProductType"=> "QuantityOnlyProduct", "UnitPrice"=> 1.41, "UnitType"=> "100g" } ] } ; print $code->{Products}[0]{ProductId},"\n"; __END__ 254881114
See also:
In reply to Re: Data from a Hash/Array
by toolic
in thread Data from a Hash/Array
by foggy3657
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |