No. my $foo; is a different variable than another my $foo;, and it's a different variable than package variable $any::package::foo. You could use our instead of my to access the package variable without using its full name.

package MODPERL::SausageGrinder;

$MODPERL::SausageGrinder::foo = "bar";
our $foo;    # Associates $foo with $MODPERL::SausageGrinder::foo
print $foo;  # bar
[download]