Select Code to Download

#!/usr/bin/perl

...
pgmctr@m3
pgmctr@m4
pgmctr@m5

alureg {
        d1 {
...
        }
        m1,m2,m3,m4,m5
}