perl -e "system('dir ...')"