Select Code to Download

    package HiWorld;
    use strict; use warnings;
...
    }

    1;

    #!/usr/bin/perl
    use strict;
...

    $server->set_engine_object( $cgi );
    $server->run();