Select Code to Download

#!/usr/bin/perl

use strict;
...
);

print "$parameters[0][1] (should be 12)\t$parameters[1][1] (should be 
+3)\n";