M
Math55
hi, this is a piece of code from a program.
----
my $size;
my $realPath;
my @filterArray;
open READFILTEREDLIST,'</tmp/FILTEREDLIST' or die "Datei kann nicht
geoeffnet werden: $!\n";
while(<READFILTEREDLIST>) {
@filterArray=<READFILTEREDLIST>;
}
close READFILTEREDLIST;
open (WRITEPATHS, ">/tmp/FILTEREDPATHS") or die "Datei konnte nicht
gefunden werden";
print "open \n";
foreach(@filterArray){
print "array: $_\n"; #NOTHING!!!
(my $datei, my $pfad)=fileparse($_);
($size, $realPath)=split('\s', $pfad);
print "path: $realPath\n";
print WRITEPATHS "$realPath\n";
}
close WRITEPATHS;
----
the file FILTEREDLIST contains something like:
132k /var/backups/dpkg.status.1.gz
132k /var/backups/dpkg.status.2.gz
124k /var/backups/dpkg.status.3.gz
8.0k /var/log/auth.log.1.gz
12k /var/log/auth.log.2.gz
4.0k /var/log/auth.log.3.gz
12k /var/log/daemon.log.1.gz
12k /var/log/daemon.log.2.gz
8.0k /var/log/daemon.log.3.gz
8.0k /var/log/debug.1.gz
12k /var/log/debug.2.gz
4.0k /var/log/debug.3.gz
8.0k /var/log/kern.log.1.gz
4.0k /var/log/kern.log.2.gz
8.0k /var/log/kern.log.3.gz
8.0k /var/log/messages.1.gz
8.0k /var/log/messages.2.gz
8.0k /var/log/messages.3.gz
4.0k /var/log/setuid.changes.1.gz
but when i want to read that into the array, something does wrong. the
array is always empty, do you see the mistake? the file is not
empty...
THANKS!!
----
my $size;
my $realPath;
my @filterArray;
open READFILTEREDLIST,'</tmp/FILTEREDLIST' or die "Datei kann nicht
geoeffnet werden: $!\n";
while(<READFILTEREDLIST>) {
@filterArray=<READFILTEREDLIST>;
}
close READFILTEREDLIST;
open (WRITEPATHS, ">/tmp/FILTEREDPATHS") or die "Datei konnte nicht
gefunden werden";
print "open \n";
foreach(@filterArray){
print "array: $_\n"; #NOTHING!!!
(my $datei, my $pfad)=fileparse($_);
($size, $realPath)=split('\s', $pfad);
print "path: $realPath\n";
print WRITEPATHS "$realPath\n";
}
close WRITEPATHS;
----
the file FILTEREDLIST contains something like:
132k /var/backups/dpkg.status.1.gz
132k /var/backups/dpkg.status.2.gz
124k /var/backups/dpkg.status.3.gz
8.0k /var/log/auth.log.1.gz
12k /var/log/auth.log.2.gz
4.0k /var/log/auth.log.3.gz
12k /var/log/daemon.log.1.gz
12k /var/log/daemon.log.2.gz
8.0k /var/log/daemon.log.3.gz
8.0k /var/log/debug.1.gz
12k /var/log/debug.2.gz
4.0k /var/log/debug.3.gz
8.0k /var/log/kern.log.1.gz
4.0k /var/log/kern.log.2.gz
8.0k /var/log/kern.log.3.gz
8.0k /var/log/messages.1.gz
8.0k /var/log/messages.2.gz
8.0k /var/log/messages.3.gz
4.0k /var/log/setuid.changes.1.gz
but when i want to read that into the array, something does wrong. the
array is always empty, do you see the mistake? the file is not
empty...
THANKS!!