Select Code to Download

use strict;
use warnings;
...
while ( ( my $kid = wait ) != -1 ) {
    print $stdout "$kids{$kid} returned $?\n";
}

www.stackoverflow.com returned 0
www.perlmonks.org returned 0
www.whitehouse.gov returned 0