Perl Code showing RegExp Compilation

Hi,

 

This is  working environment

 

Sun solaris os - Ver 5.8 

 Perl - Ver 5.8.7

 GCC - Ver 3.4.2

 Crypt-SSLeay - Ver 0.51

 Net_SSLeay- Ver 1.30

 IO-Socket-SSL- Ver 0.97

 

when i run the following program 

 

use strict;

use warnings;

use XML::Simple;

use Data::Dumper;

require Text::CSV;

 

my $xml = new XML::Simple(KeyAttr=>[]);



$i = 0;

foreach $x (@SourceData) 

 {

  foreach $y (0 .. 13) 

   {

    if ($x =~ $Infile[$p][$y])

     {

       foreach $row ($p .. $count) 

        {

        $Temp[$row-$p][$i] = $Infile[$row][$y];

        }

      }

      }

  $i++;

  }

for ($j = 0;$j<$colcount;$j++)

{

 $Temp[0][$j] = $DataColumns[$j];

}

 

########################################

Error it is showing is 

########################################

 

Use of uninitialized value in regexp compilation at main_wach.pl line  if ($x =~ $Infile[$p][$y])





Kindly help me out in solving this issue...



Thanks in advance



Regards

K.Subrahmanian



_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _



Information transmitted by this EMAIL is proprietary to iGATE Group of Companies and is intended for use only by the individual 

or entity to whom it is addressed and may contain information that is privileged, confidential, or exempt from disclosure under 

applicable law. If you are not the intended recipient of this EMAIL immediately notify the sender at iGATE or mailadmin@igate.com 

and delete this EMAIL including any attachments

_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _

• Perl Code showing RegExp Compilation by Subrahmanian Kalyanasundaram
• Re: Perl Code showing RegExp Compilation by Steve Peters