#!/usr/bin/perl

package test1;

sub bar { 
   print "Hello $_[0] $_[1]\n" 
}

sub blat { 
   print "World $_[0]\n" 
}
1;