Select Code to Download

#!/usr/bin/perl
use warnings;
...
# It is important to waitpid on your child process,  
# otherwise zombies could be created.

#!/usr/bin/perl 
use warnings;
...
print $result;