, "<$f");
binmode($f);
my $data =;
close(MYFILE);
return $data;
}
LRMK
- Original Message -
From: "sudhindra k s" <[EMAIL PROTECTED]>
To: "LRMK" <[EMAIL PROTECTED]>
Cc: <[EMAIL PROTECTED]>
Sent: Thursday, June 24, 2004 11
my $myItem = $path. "\\" . $item;
if ($item =~m/^(\.)+$/){
return 0;
}
if (-d $myItem){
return 1;
}else{
return 0;
}
}
####
######
LRMK
- Original Message -
From: sudhindra k s
To: LRMK
Cc: [EMAIL PROTECTED]
Sent: Thursday, June 24, 2004 1
Hi
Thanks. I tried this script. It compares the filenames within the directory very well.
But i want to compare even the contents and report the differences between the files.
Regards
Sudhindra
On Tue, 22 Jun 2004 LRMK wrote :
>
>This must do the STYLE="text-decoration: none; border-botto
This must do the job but there must be a more nice looking way of doing this
Code
___
compare("c:\\program files","d:\\program files"); #Example call
sub compare($$){
my ($p1, $p2) [EMAIL PROTECTED];
print "comparing $p1 with
