# path to program
my $prog = '/local/path/to/cgi-bin/executableprog';

open(PROG, "| $prog") || die "Can't run '$prog': $!\n";
print PROG "$file\n";
close(PROG);


##</code><code>##

my $pid = open PIPE, "-|";


##</code><code>##

exec PROG or die "Cannot open pipe to executableprog: $!";