print PARENTWRITE "1\n"; # perhaps something useful like $pid?