Zeile zurückspringen

[Siechfred]

Hat jemand eine Idee, wie ich den wieder zurücksetzten kann bzw. eine allgemein bessere Lösung für meine Aufgabe?

So sollte es gehen:

while(<FILE>) {  
  if(/^\s{6}\w+/) {  
    print 'Section: ', $_, "\n";  
  }  
  else {  
    print 'Process: ', $_, "\n";  
  }  
}

Siechfred