exec( $^X, 'monitored.pl', $port ) if ( $pid == 0 );