echo "hallo" | perl -le 'open GR, "| grep hallo |"; $text = <GR>; print GR "eins\nhallo da bin ich\nzwei\n"; print "\n$text";'