Select Code to Download

my $pid = fork // die "fork: $!";
unless ($pid) {
...
}
... parent stuff ...
wait;

given (EXPR) {
    when (!defined) {...}
    when (!$_) {...}
    default {...}
}