{ # long block begin
   .
   .
   {
      my $name = 'foo';
      .
      .
   }
   .
   .
   {
      my $name = 'bar';
      .
      .
   }
   .
   .
}