Packages

#!/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

Previous slide

Next slide

Back to first slide

View graphic version