#! /usr/bin/perl -ws use mytest2; print mt2(55), "\n";