Select Code to Download

  
c_1_mm
c_2_mm
c_3_mm
c_4_mm

1
2
...
8
9
0

c_1_mm_1 c_2_mm_1 c_3_mm_1 c_4_mm_1
c_1_mm_2 c_2_mm_2 c_3_mm_2 c_4_mm_2
...
c_1_mm_8 c_2_mm_8 c_3_mm_8 c_4_mm_8
c_1_mm_9 c_2_mm_9 c_3_mm_9 c_4_mm_9
c_1_mm_0 c_2_mm_0 c_3_mm_0 c_4_mm_0

#!/usr/bin/perl
use strict;
...

my @cell_file = <CFILE>;
my @pvt_file = <PFILE>;