Select Code to Download

where $reg_num_values[0]=$month_values[0]

my @reg_num = qw/12345 98564 33234 112345 87564 2345678 938566 1234486
+ 223456 123488/;
my @month = qw/03 01 01 10 05 11 03 05 02 09/;
...

my $sth = $dbh->prepare($statement);
   $sth->execute();