Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl

...

print encode_entities($line, "\200-\377"); # looking for “ &rdqu
+o; in the output
print $line;
  2. or download this
    This is a test of “quotes”
This is a test of “quotes”
  3. or download this
    This is a test of “quotes”
This is a test of “quotes”