#!/usr/bin/perl # This is a main program... use strict; use warnings; use ZipUtilDemo; #unzipping imported by default here print "starting main program\n"; unzipping(); #call unzipping sub in module ZipUtilDemo.pm __END__ Prints: starting main program Sub unzipping called!