Select Code to Download

use Data::Dumper;

...
Ginger: 2 papayas
Professor: 3 coconuts
MaryAnn: 2 papayas

$VAR1 = {
          'Ginger' => {
...
                           'coconuts' => '3'
                         }
        };