Hi Monks,

I am reading in a text file (that I am free to edit) which contains lines of either text or numbers. As I read in, line by line, I push the line into @numbers or @text, as appropriate. I am using both strict and warnings.

My question concerns handling of "\n" in the input file. In one of the lines of text in the file, I find the string:

"some text here \n some text here."

When I look at @text after I am done with the file, that array element reads:

"some text here \\n some text here."

I've pinpointed the change to the following snippet of code surrounded by Dumper calls:

 if ($x>=2 && $line !~ /^Text/) {
    $string .= $line;
    print "In 'if, line ne text', string is:\n$string\n";
    $x++;
    next;
    }
 if ($x!=0){ 
    push (@texts, $string);  # whether I use this line or the one afte
+r, the result is the same
#    $texts[$i] = $string;
    print  "In if, using push, \@texts is:\n";
    print Dumper(@texts), "\n";
    $string = '';
    $i++;
    $x = 0;
    goto TT;
    }
[download]

The output is, as mentioned above:

In 'if, line ne text', string is:
some text here\n some text here
In if, using push, @texts is:
$VAR1 = 'some text here.';
etc...
$VAR10 = 'some text here.\\n some text here.';
[download]

So, my question is, why is the newline character having an extra escape character added to it when I push it into @texts, and how do I keep the \n but remove the extra '\'?

Thanks!