$ perl -e 'system("echo bla > file");' $ cat file bla