1) A naked block can be used for various things. One of the more common is to limit the scope of variables. ie:

{
my $tempvar = somefunc();
# do something with $tempvar
}
# $tempvar no longer exists here.
[download]

{
  local(*INPUT, $/);
  open (INPUT, $file)     || die "can't open $file: $!";
  $var = <INPUT>;
}
# $/ is set back to it's original value here.
[download]

2) Without knowing what you were doing with the regex, it is hard to say how it may have been wrong.

3) next goes to the next interation of the loop, not the last one. In effect it skips the rest of the current iteration (although it does execute the continue block if you have one). One common use is for skipping certian lines while reading a file.

while (<FH>) {
   next if /^#/;  # Skip comments
   # now do something with $_
}
[download]