gaucheを用いて標準入力から読み込んでそのまま出力する

強制的にschemeに馴染むためにコマンドラインからruby,perlを駆逐することにした。
(いいのか?こんな宣言をして)

そしていきなりつまづいた。
schemeで標準入力いじってなかった事に気がついた。

(print (port->string (standard-input-port)))

例:

$ echo -e ">>aaa\n>>>bbb\n>ccc" | gosh -e '(print (port->string (standard-input-port)))'
>>aaa
>>>bbb
>ccc

print STDIN.read と意味的に同じか。単になれてないだけだな。