$_ = join '', ; while (m/(.*)
\n(?:(.*)
\n)?(.*)

/g) { print "$1 - $2 - $3\n\n"; } __DATA__ Name
Address
URL

Name2
Address2