Hello, I am writing a perl program that has to do the following. 1) Call another C program passing it the file name to read from and file to write to. (Already done) 2)The perl program must wait for all files to be written to before continining.

$index=0;

my $inputfile="perloutput";
my $endfile=".txt ";
my $smb=" ";
my $outputfile="output";
my $smb2="&";

while ($index<2)
{
   my $testpath="chirp_md5sum ";
   $testpath=$testpath.$inputfile.$index.$endfile.$smb.$outputfile.$in
+dex.$endfile.$smb2;
   chomp $testpath;
   print ("$testpath \n");

   $id=fork();

   if ($id == 0) {
   exec($testpath);
   exit();
  }
 $index++;
}

for ($count=0; $count<16; $count++)
{
        $num=wait();
        print "Wait: $num\n";
}
[download]