open(FD, "-|", "gpib.exe") or die "$!";
while ( $value=<FD> ) {
   doSomething($value);
}
close(FD);