#!/usr/bin/perl -wT

use strict;
use CGI qw(:standard);

use lib "/home/public_html/cgi-bin";
use DATA99 qw(WasonE);

##</code><code>##

package DATA99;
require Exporter;

our @ISA       =  ("Exporter");
our @EXPORT_OK =  qw(WasonE);

sub WasonE {
variables...
}
1;