in reply to code explanation

Have you read   perldoc -f perlintro?   perldoc -f eval?   perldoc -f die?   perldoc -f kill?   perldoc -f alarm?   perldoc -f waitpid?   perldoc -f setpgrp?   perldoc -f exec?   perldoc -f die?   perldoc -f exit?

Mr. Peabody Explains fork()??