view release on metacpan or  search on metacpan

lib/Async/Event/Interval.pm  view on Meta::CPAN

            "Event ID %d with PID %d ran %d times, with %d errors and an interval" .
            " of %.2f seconds\n",
            $event->id,
            $event->pid,
            $event->runs,
            $event->errors,
            $event->interval
        );
    }

    sub update {
        # Because each event runs in its own process, $$ will be set to the
        # process ID of the calling event, even though they both call this
        # same function

        $shared_data{$$}++;
    }

=head2 Event error management

If an event crashes, print out error information and restart the event.