Mega Code Archive

 
Categories / Perl / Language Basics
 

Define variables with the same name in different package

#!/usr/bin/perl -w $main::name   = "Your Name Here"; $Tom::name   = "Tom"; $Jack::name = "Jack"; print "\$name in package main   is $name\n"; print "\$name in package Tom   is $Tom::name\n"; print "\$name in package Jack is $Jack::name\n";