for (my $x = 0; $x < 10; ++$x) {
  # stuff
  my $y = $x;
  # more stuff
}
[download]

Also for some definition of scope, <package> starts a new scope.

And if we want the source differing, an if starts a scope and is different from either a block or a loop - try to do redo and it ignores the enclosing if for the enclosing block or loop.

I have also had occasion to run Perl code in a different process by opening a pipe to it, writing my code on the pipe, and then sending __END__. Does that count?

What about running code using reval from Safe? Does that count as different from eval?