##
Pin vcc
aaaa
bbbb
Port
Layer m2 ;
END
CCC
DDD
Port
Layer m1 ;
END
EEE
FFF
Port
Layer m0 ;
END
END vcc
####
if (/PIN vcc/../END vcc/) {
if(/LAYER\s+m(\S+)/) {
push(@num, $1);
print "@num", ;
}