March 21, 2003
Fabrizio Coccetti - Stanford Linear Accelerator Center
11
Example: the beginning of IEPM::PingER
n
package IEPM::PingER;
n
n
use 5.008;
n
use strict;
n
use warnings;
n
use Carp;
n
require Exporter;
n
our @ISA = qw(Exporter);
n
use Time::CTime;
n
use DB_File;
n
n
our @EXPORT = qw(log_it ping_it);
n
our $VERSION = '1.03';