Select Code to Download

#!/usr/bin/perl -w 
use strict;
...
b b b b b
c/d c c c/d c/d

Apple Grape Banana
5 2 3/4
...
my @Values = ([qw(5 5 2 3 4  )],
              [qw(10 15 3 4 4 )],
              );