#!/usr/bin/perl -w

package Szyewicki;

$Robert = "the boss";

package PoolHall;

$Robert = "the darts expert";

package Sywiecki; # back to work!

print "Here at work, 'Robert' is $Robert, but over at the pool hall, 'Robert'
is $PoolHall::Robert\n";