Help for this page

Select Code to Download


  1. or download this
    my $str = str::new('<encode this later>');
my $html = "<html>$str</html>";
print $html; # <html><encode this later></html>
print $html->encode; # <html>&lt;encode this later&gt;</html>
  2. or download this
    #!/usr/bin/perl
use strict;
...
}

1;
  3. or download this
    $VAR1 = {
          'BAD' => [
...
                                 ], 'str' )
                        ]
        };