Select Code to Download

#!/usr/bin/perl -l

...
    $cgi->div({-id => 'pagewrap'}, "Hello"),
    $cgi->end_html();
}

#!/usr/bin/perl -l

...
  my $cgi = CGI->new;
  print header, start_html, div({-id=>'pagewrap'}, "Hello"), end_html;
}