Select Code to Download

#!/usr/bin/perl -w
use strict;
...
Navi2::print_navi($cgi);
print "test";
Navi2::end_navi($cgi);

#!/usr/bin/perl -w

use strict;
...
    my $cgi = shift;
    print $cgi->end_html;
}