<%init> use strict; # path to modules use lib "usr/local/www/apache/htdocs/TEST"; # modules to use use check;

hello there

% my $test1 = check::one(); % if ($test1 eq 'yes') {

test 1 ok

% } % my $test2 = check::two(); % if ($test2 eq 'two') {

test 2 ok

% } % my $test3 = check::three(); % if ($test3 eq 'three') {

test 3 ok

% } % my $test4 = check::four(); % if ($test4 eq 'four') {

test 4 ok

% } % my $test5 = check::five(); % if ($test5 eq 'five') {

test 5 ok

% } % my $test6 = check::six(); % if ($test6 eq 'six' ) {

test 6 ok

% }

Version is: <% $check::VERSION %>.

##

package     check;
use strict;
require Exporter;
our @ISA = ('Exporter');
our @EXPORT =   ( 'one','two', 'three', 'four', 'five', 'six' );
our $VERSION=1.10;

sub one
{
  return 'yes';
}

sub two
{
  return 'two';
}

sub three
{
  return 'three';
}

sub four
{
  return 'four';
}

sub five
{
  return 'five';
}

sub six
{
  return 'six';
}

1;