#!/usr/bin/perl use warnings; use strict; print "This is test.pl\n"; # use main_1; # use main_2; # use main_3; ########## main_1.pm ############################# package main::; print "this is main_1\n"; ################################################## ########## main_2.pm ############################# package main::; print "this is main_2\n"; ################################################## ########## main_3.pm ############################# package main::; print "this is main_3\n"; ##################################################