Select Code to Download

my $fd = shift @{$_};
my $child = shift @{$_};

my $fd = $_->[0];
my $child = $_->[1];