$count=0; while ($count < 20){ $count+=1; if ($$hashRecordPtr{'price_product1'} ne "" ) { print ""; if ($$hashRecordPtr{'connection1_description'} ne ""){ print<<"CONNECTION1"; $$hashRecordPtr{'connection1_size1'} CONNECTION1 } if ($$hashRecordPtr{'connection1_description'} ne ""){ print<<"CONNECTION2"; $$hashRecordPtr{'connection2_size1'} CONNECTION2 } print "$$hashRecordPtr{'part_number1'}"; if ($$hashRecordPtr{'part_reference1'} ne ""){ # ie its a pack not ind. print<<"PARTREF"; $$hashRecordPtr{'part_reference1'} PARTREF } if ($$hashRecordPtr{'pack_qty1'} > 2){ # ie its a pack not ind. print<<"PACK"; $$hashRecordPtr{'pack_qty1'} PACK } print<<"HTML3";
£$$hashRecordPtr{'price_product1'} Add To Basket
HTML3 } #cut out from here }