$ perl -le " print for 1..3 " | perl -MData::Dump -e " dd [<>] " ["1\n", "2\n", "3\n"] $ perl -le " print for 1..3 " | perl -MData::Dump -e " undef $/; dd [<>] " ["1\n2\n3\n"] $ perl -le " print for 1..3 " | perl -MData::Dump -0777 -e " dd [<>] " ["1\n2\n3\n"]