#!/usr/bin/perl -w
Package OakTrees;
sub getseeds { print "acorns";
}
Package PalmTrees;
sub getseeds { print "coconuts"
; }
getseeds() ; # prints coconuts;
OakTrees::getseeds(); # prints
acorns
PalmTrees::getseeds(): # prints
coconuts
# A package is a separate
namespace for
# functions and
variables.
# To cross packages use
fully-qualified name