I think Jeff misunderstands how your data is coming in

Nope. You said it right the first time: TIMTOWDTI ;)
I mentioned the extra new-lines, I did not address them because I did not know EXACTLY how the data will look EVERY time - what if there are multiple blank lines?

my ($match) = $current =~ m/$start\s*(.*)\s*$end/s;
[download]

But thanks for sharing comments and critisicms, don't get me wrong, ++cLive ;-) :)

Jeff

R-R-R--R-R-R--R-R-R--R-R-R--R-R-R--
L-L--L-L--L-L--L-L--L-L--L-L--L-L--