#!/usr/bin/perl -s
#  -d creates a .debug camila file


use IPC::Open3;  # para redireccionar stdin, stdout stderr dum comando

$pid=open3(\*CAM, \*Reader, \*Error, "a.out") or die "cant camila\n" ;
#$pid=open3(CAM, Reader, Error, "dict.pl") or die "cant camila\n" ;

print CAM ("2 .+ 33; " );


close CAM;

while(<Reader>){
  print $_;
}