Suche Array von Strings für bestimmte Wörter

Question

Erstens, ich kenne Perl überhaupt nicht, und brauche eine relativ schnelle Antwort auf diese Frage. Ich habe das Ergebnis einen Befehl in einem Array gespeichert ausgeführt wird:

my @result = `$command`; 

Was ich tun muß, ist das Array zu suchen, um zu sehen, ob jedes Element das Wort „Merge“ enthält oder das Wort „geändert“ (beide Groß- und Kleinschreibung).

Kann jemand bitte beraten?

Answer 1

Das Werkzeug für den Job hier ist grep - eine Funktion, mit der Sie einen Filter für eine Liste angeben können. Sie können es ähnlich wie Unix grep verwenden, es ermöglicht aber auch komplexere Tests (z. B. Ausführen von Code).

In Ihrem Fall:

my @matches = grep { /merge|changed/i } @result; 

if (@matches) { 
    print "One or more lines matched\n"; 
} 

Answer 2

Sie diese mit einem regulären Ausdruck tun. In diesem Beispiel, wenn die Zeile Spiel 'verschmelzen' oder 'geändert' (unempfindlich natürlich) wird die Zeile gedruckt:

#!/usr/bin/perl 
use strict; 
use warnings; 

my @result = `command`; 

foreach my $line (@result){ 
    if ($line =~ /merge|changed/i){ 
     print $line; 
    } 
}