#!/usr/bin/perl

use strict;

package t2;

# ------------------------------------------------------------------------------
# Constants (Operationally, if not technically)
# ------------------------------------------------------------------------------

our	$RET_SUCCESS		= 0;
our	$RET_FAILURE		= (-1);
our	$RET_FATAL			= (-2);

my	$TRUE	= 1;
my	$FALSE	= 0;


# ------------------------------------------------------------------------------
# version() - Returns the version number of this module
# ------------------------------------------------------------------------------

sub version
{
	return sprintf "0.10a";
}


# ------------------------------------------------------------------------------
# Perl modules MUST return true
# ------------------------------------------------------------------------------

1;

__END__