open my $f_txt, "-|", "antiword $document" or die "...";
 while (<$f_txt>) {
     # read line by line
     }
 close $f_txt;