Das -ne veranlasst Perl den nachfolgenden Code für jede Zeile der übergebenen Datei auszuführen. Wie du bereits erkannt hast trennt das Semikolon einzelne Befehle (zumeist am Zeilenende).
$cnt=4 if /NOID/; setzt eine Zählervariable wenn Perl ein 'NOID' sieht (Matchingoperator).
print unless $cnt && $cnt--; gibt die aktuelle Zeile aus solange die Zählvariable NICHT einen Wert hat und dekrementiert anschließend die Zählvariable (aber nur solange sie einen Wert hat - durch die logische Verundung der Befehle).\n\n

<!--EDIT|Ronnie|1115131021-->