Community  »  Perl: Allgemeines Forum

Zwei ausgaben vergleichen	Seitenanfang
sorry, das ich vielleicht für manche sowas lapidares frage, aber ich bin noch anfänger und schlage mich jetzt schon tage damit rum, wie kann ich zwei ausgaben z.b. ein ls -l auf das eine verzeichniss mit dem ls -l auf ein anderes verzeichniss mit perl vergleichen? es sollen nur gemeinsame dateinamen ausgegeben werden? Datum: 13.01.2005-08:42
re: Zwei ausgaben vergleichen	Seitenanfang
#! /usr/bin/perl my $dir1 = '/path/to/dir1/'; my $dir2 = '/path/to/dir2/'; my @files = `ls $dir1`; my @sec_files = `ls $dir2`; print $_,"\n" for(grep{my $i = $_; grep{$_ eq $i}@files}@sec_files); ungetestet... Datum: 13.01.2005-09:13