Hallo
ich habe ein Script erstellt der in einer Datei suchen soll.
Datei: test.txt sieht so aus:
Code:
Name1;Vorname1;Strasse 1
Name2;Vorname2;Strasse 2
suchen.pl sieht so aus:
Code:
#!/usr/bin/perl
use strict;
use warnings;
my $nname = "Name2";
my $vname = "Vorname2";
my $strasse = "Strasse 2";
my $alles = "$nname;$vname;$strasse";
my $datei = 'test.txt';
my $suchen = qr/$alles/i;
open my $inhalt, '<',$datei or die $!;
while(my $zeile = <$inhalt>){
if($zeile =~ /$suchen/){
print $zeile;
}
}
close $inhalt;
wie kann ich jetzt das gefundene als wert weiter verarbeiten?
so geht es nicht;
Code:
...
...
while(my $zeile = <$inhalt>){
if($zeile =~ /$suchen/){
print $zeile;
my $gefunden = $zeile;
}
}
close $inhalt;
print $gefunden;
also, ich möchte das gefundene weiter verarbeiten, wie mache ich das?
Danke im voraus für Antwort
LG,
Roki
Lesezeichen