Select Code to Download

3-AUG-2007
8-AUG-2007
...
1-OCT-2007-RevA
1
2

 ($foo, $bar, $date) = qw(fooa bar7 1-OCT-2007-RevA);
  print "++$foo ++$bar ++$date\n"

  foob bar8 1