Select Code to Download

#!/usr/bin/perl -w 
use strict;
...
        }

}

0    0
system command $a 0, then for $s 0
...
Yes.->30
4    0
Yes.->40

system command $a 0, then for $s 0
system command $a 0, then for $s 1
...
system command $a 1, then for $s 1
system command $a 1, then for $s 2
.... and so on and so on.