in reply to How can I remove 0 from first line and empty space from the start of the following line and join them

Since a vim solution was posted, here's an awk one: 
awk 'BEGIN { ORS=""; OFS="\t" } /^0/ {print $2, $3, $4, $5}  /^[ \t]/ 
+{print $0, "\n" }'

[download]
TMTOWTDI, even if it's not in perl :)
---
"I hate it when I think myself into a corner."
Matt Mitchell
  • Comment on Re: How can I remove 0 from first line and empty space from the start of the following line and join them
  • Download Code

In Section Seekers of Perl Wisdom