An Australian court order is leading Heinz to give away some 2,000 tons of pineapple to Australia's homeless community.