Help for this page

Select Code to Download


  1. or download this
    $ cat /tmp/html-data.pl
#!/usr/bin/perl
...
Hi, I'm script html-data.pl,
located at /tmp/
running with process id 4291
  2. or download this
    my $template = load_page([<DATA>]);
sub load_page {
    my $stuff = shift;
    HTML::Template->new(arrayref => $stuff);
}
  3. or download this
    local $/ = undef;
my $template = load_page(\<DATA>);
...
    my $stuff = shift;
    HTML::Template->new(scalarref => $stuff);
}