- or download this
#!/usr/local/bin/perl
use XYZ;
...
my $x = new XYZ();
$x->gen_pb();
1;
- or download this
package XYZ;
sub gen_pb {
...
close FHPB;
}
- or download this
#!/usr/local/bin/perl
use CGI::Application;
...
....
my $x = new XYZ();
$x->gen_pb();