Select Code to Download

#!/usr/bin/perl
use v5.10.1;
...

say "$options{'a'}->[0], $options{'a'}->[1]";
say "$options{'b'}->[0], $options['b'}->[1]";

$./program -a a1_1 a1_2 -a a2_1 a2_2 -a a3_1 a3_2