Help for this page

Select Code to Download


  1. or download this
    Code: ( text )
#!/usr/bin/perl -w
...
my $string1 = "-----\\---------";
$string1 =~ s/"\\"/"\"/g;
print "The resulting value is : $string1 \n";
  2. or download this
    Code: ( text ) C:\>
C:\>test_string_replace21.pl
The resulting value is : -----\---------
  3. or download this
    Code: ( text )
#!/usr/bin/perl -w
...
my $string1 = $ARGV[0];
$string1 =~ s/"\\"/"\"/g;
print "The resulting value is : $string1 \n";
  4. or download this
    Code: ( text )
C:\>test_string_replace2.pl "-----\\-----"
The resulting value is : -----\\-----