perl -pe '$\=$_.$\}{'
perl -p は各行読み込んで $_ に入れてスクリプト実行が終わるたびに print する、というものなのだけど、 perl interpreter は
"while (<>) {" + <script> + ";}continue{print;}"
相当のコードを作ることでこれを実現している (toke.c)
while (<>) {$\=$_.$\}{;}continue{print;}