#! perl -slw use strict; $/ = ''; # paragraph mode print "'$_'" while ; __DATA__ abc: asdf1 asdf2 def: asdf3 ghi: asdf4 asdf5