Update of /cvsroot/http-webtest/HTTP-WebTest/lib/HTTP/WebTest
In directory usw-pr-cvs1:/tmp/cvs-serv23812
Modified Files:
Parser.pm
Log Message:
Minor fix
Index: Parser.pm
===================================================================
RCS file: /cvsroot/http-webtest/HTTP-WebTest/lib/HTTP/WebTest/Parser.pm,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** Parser.pm 8 Feb 2002 14:25:31 -0000 1.5
--- Parser.pm 8 Feb 2002 14:31:34 -0000 1.6
***************
*** 104,108 ****
# sequences like \n but don't treat $ and @ as
# special
! $extracted =~ s/(\$|\@)/\\$1/g if $delim eq '"';
my $string = eval "$extracted";
$string;
--- 104,108 ----
# sequences like \n but don't treat $ and @ as
# special
! $extracted =~ s/(\$|\@)/\\\\$1/g if $delim eq '"';
my $string = eval "$extracted";
$string;
|