for (1..4) {
   my $a = 1;
   my $b = 2;
}