Help for this page

Select Code to Download


  1. or download this
    use lib ('G:\Perl Live\OO Packages');
use Mailsort;
...
$ob->update_database('DSA','a database');

print $ob->{DATABASE}."\n";
  2. or download this
    package Mailsort;
use lib ('G:\Perl Live\OO Packages');
...

    return($params);
}
  3. or download this
    package Mailsort_scj;
require Exporter;
...

    $class->{Database}{$type} = $valuein;
}