Help for this page
END { kill 'INT' => keys %children; }
#!/usr/bin/perl -w use strict; ... END { print "This is in the end.\n"; }