C:\Perl\site\lib> more MyPackage.pm package MyPackage; use strict; use CGI::Simple; require Exporter; use vars qw/@ISA @EXPORT $CGI/; @ISA = qw/Exporter/; @EXPORT = qw/init $CGI/; sub init { $CGI = CGI::Simple->new; } 1; C:\Apache2\www> more index.pl #!c:/perl/bin/perl -w use strict; use MyPackage; init(); print $CGI->header, ''; print $CGI->param('text') if defined($CGI->param('text')); print <<'END_HTML'; END_HTML