Select Code to Download

#!/usr/bin/perl 
use strict;
...

warn "starting event loop\n";
Event::loop;

Perl exited with active threads:
        0 running and unjoined
        1 finished and unjoined
        0 running and detached