my $c;
thing {
   ...
   ... $c ...
   ...
} $c;