But why do you want nested subs in the first place? You're not making closures, right? One common way to get "private" helper subs in your module is:

sub something_useful {
   my $x = _helper(shift);
   return $x;
}
sub _helper {
   ...
}
[download]

One major advantage is in testing: the helper subs can be called directly.