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.
>
>