$ perl -E 'say for "qwe", "qwe\n"' qwe qwe