perl -wMstrict -E 'say -f "utf.pl" && say -e _'