#!/usr/bin/perl -w
# prog1.pl
package Prog1;

sub main {
    print "Hello @_";
};

main(@ARGV) if ! caller;