#!/usr/bin/perl use warnings; use strict; use MyTest; my $tst = MyTest->new(); $tst->test();