#!/usr/bin/perl use v5.8.2; # Use the version which is on the AIX machines use strict; # Declare strict checking on variable names, etc. use bigint; # Be able to handle 64-bit integers. Unfortunatelly also floats are truncated to integer, but that's ok because we're not using any of them! package FunctionsAPI; require Exporter; our @ISA = "Exporter"; # inherit from the Exporter-Class our @EXPORT = qw(drawError drawWarning whiteTrim leadingWhiteTrim); # our functions to get exported by default our $VERSION = 0.01; # this is the momentary package version my ($INITMEM, $RESULTMEM) = ( 0, 1 ); my $globalwarning = 0; sub ... and so on...