my @fileIn = (); if(open(INPUTFILE,"defs.cfg")) {    while() {       next unless /"(.*)","(.*)"/;       push @fileIn, $_;    }    close(FILE); } if(scalar @fileIn) { # ersetzt $matching eq 'true' } else { }