Select Code to Download

#! /usr/bin/perl
use strict;
...
Ginger Banana 800
Ginger Fry    150
Ginger Banana 45

Ginger    Fry       350  
Ginger    Banana    845  
Apple     Grape     180