{ use autodie qw' system '; system $^X, "$pathtodocx/docx2txt.pl", "$infile.doc", "$outfile.txt"; }