# perl code
{
  my $static_var = 0;
  sub return_it { return $static_var }
}