perl -e "system('cmd /c type myfile.txt')"
perl -e "system('cat myfile.txt')"