#!/usr/bin/env perl use v5.34.1; use strict; use warnings; use L3TDE::Bot; L3TDE::Bot->create_bots; $SIG{CHLD} = 'IGNORE'; for my $bot (@{L3TDE::Bot->find}) { my $pid = $bot->start; } while ((my $pid = wait) != -1) { say "Reaped $pid"; }