sleep 2; # give time to child process
while ( my @ready = $select->can_read()) { 
  ...
};