foreach (@quelldatei) {
   if (/^ein (.+?) /) {
      # mach was mit $1
   } else {
      # oder auch nicht
   }
}