perl -e 'system q{>file.dat}'