Thank You Every Body for the Help i am able to check the same. regards mazhar
On 11/29/05, Muthukumar <[EMAIL PROTECTED]> wrote: > > > > On 11/29/05, Mazhar <[EMAIL PROTECTED]> wrote: > > > > Sorry i am passing the OPEN as > > Open (FILE1,"<one Fuile"); > > Open (FILE,"<Second File"); > > > > Still the string is ot matching. Help me please > > > > Use like this: > > > open FD, "< file1"; > open FD1, "< file2"; > > while (<FD>) > { > $line1=chomp($_); # chomp() Needed > > while (<FD1>) > { > $line = chomp($_); # chomp() Needed > if ($line =~ /.*$line1.*/) # (.*)Not needed > { > print "Got the String\n"; > } > > } > } > Revert on having more queries. > >