#!/usr/bin/perl;

unshift @INC, "/path/to/package";

print "Interpolate variables from which package? ";

$package = <STDIN>;
chomp($package);
eval "require $package";

print <<EOF;
This variable:

$package::variable
(actually this doesn't work)

originates in package $package.

EOF