$filename ="blah.doc"; .... .... $filename =~ s/\.doc//; system 'echo "$filename.txt\n$filename.xls\n" | phylip';