hmmm… I'm not real clear on why you would want a sub to use stuff without stuff being global but

#!/perl/bin/perl
#
#  --
use strict;
use warnings;
use diagnostics;

my $test = "hello world\n";
my $stub = sub {$test = "goodbye world\n"};
print $test;
&$stub;
print $test;
[download]

at least seems to work… This is common in Lisp and other 'functional' languages, and Pascal if memory serves, but I can't say as to how I've ever felt the need in other languages. Dosen't mean that there isn't a need, just not one I've ever run into.

hsm