my ($item_number, $price, $short_desc, $long_desc) = split /\|/;