Tại sao một người chọn khai báo và khởi tạo biến từ vựng trong các câu lệnh riêng biệt?

Question

Đây là một đoạn trích từ AnyEvent::Intro

# register a read watcher 
my $read_watcher; $read_watcher = AnyEvent->io (
    fh => $fh, 
    poll => "r", 
    cb => sub { 
     my $len = sysread $fh, $response, 1024, length $response; 

     if ($len <= 0) { 
      # we are done, or an error occurred, lets ignore the latter 
      undef $read_watcher; # no longer interested 
      $cv->send ($response); # send results 
     } 
    }, 
); 

Tại sao nó sử dụng

my $read_watcher; $read_watcher = AnyEvent->io (... 

thay vì

my $read_watcher = AnyEvent->io (... 

?

Answer 1

Bởi vì tài liệu tham khảo đóng cửa $read_watcher và phạm vi mà tại đó $read_watcher giải quyết đến từ vựng chỉ bắt đầu với tuyên bố sau mà chứa my.

Đây là cố ý để mã như thế này đề cập đến hai biến riêng biệt:

my $foo = 5; 

{ 
    my $foo = $foo; 
    $foo++; 
    print "$foo\n"; 
} 

print "$foo\n";