Select Code to Download

my $csv = Text::CSV->new ({
    auto_diag          => 1,
...
          $value{"Pounds"},
          $value{"Grams"};
    }