Andy Melnikov (nponeccop) wrote,
Andy Melnikov
nponeccop

Особенности национального рефкаунтинга

use EV;
use AnyEvent;

sub main {
        my $w;
        $w = AnyEvent->timer(after => 1, cb => sub {
                undef $w;
                warn 42;
        });
}

main();
EV::Loop();
В этом (исправном) коде всё прекрасно! Его можно поломать и починить более чем одним способом. Часть из поломок ловится включением ворнингов, а часть нет.

Операции поломки-починки:

- включить ворнинги
- убрать main() и вынести тело в топ-левел
- Инициализировать $w там же, где декларируем
- убрать undef $w
Tags: programming, все пидарасы а я
Subscribe

  • Post a new comment

    Error

    default userpic

    Your reply will be screened

    Your IP address will be recorded 

    When you submit the form an invisible reCAPTCHA check will be performed.
    You must follow the Privacy Policy and Google Terms of use.
  • 0 comments