Hallo, ich möchte mit dem angehängten Perlscript 2 Dateien vergleichen(Username, der e-mail adresse gegenüberstellen)
und die Kiste gibt mir immer den Fehler zurück, hab schon gegooglt bin aber immer noch nicht schlauer
Can't find Unicode property definition "U" at H:\Eigene Dateien\PerlSC\user2.pl
line 20, <FILE2> line 116.
in line 20 findet der match statt
und 116 ist die anzahl der zeilen der 1. quelldatei
Kann mir da jemand weiterhelfen, hinweise auf den Fehler helfen mir auch schon, aber im Moment tapp ich total im dunkeln
Danke im Voraus
#!/usr/bin/perl #Quell-und Zieldateien
$sourceuser= "H:\\Eigene Dateien\\User\\erg2.txt";
$source = "H:\\Eigene Dateien\\User\\user2.txt";
$dest = "H:\\Eigene Dateien\\User\\erg_1.txt";
open(ZIELFILE, ">$dest");
open(FILE1, "$sourceuser") or die "Kann die Datei $sourceuser nicht öffnen";
open(FILE2, "$source") or die "Kann die Datei $source nicht öffnen";
@liste1=(<FILE1>);
@liste2=(<FILE2>);
$zeile="";
foreach $zeile (@liste2)
{
print "$zeile";
foreach $element (@liste1)
{
if ($zeile=~m/.*$element.*/) {
print ZIELFILE "$zeile\t$element\n";
}
}
}
close ZIELFILE;
close FILE1;
close FILE2;
Datum: 10.07.2006-13:57
