package Testit;
require Exporter;

our @ISA        = qw[ Exporter ];
our @EXPORT     = qw[ forthread ];
our @VERSION    = 1.0;

sub forthread{
    my ($arg)=@_;
    warn "forthread called with argument: '$arg'";
    return 0;
}

1;