my $pid = open KID, "| /path/to/your/perl theScript.pl" or die ...
print KID $IPAddress;
close KID;