#!/usr/bin/perl -w package Module1; sub HelloWorld { print "Hello world.\n"; } 1;