in reply to removing new line character embedded in multi-line string

Grandfather nailed it on the head.
Try this: 
$case{'judges'}=~ s/\n/ /g;
to
$case{'judges'}=~ s/\r\n/ /g;

[download]
--
I used to drive a Heisenbergmobile, but everyone I looked at the speedometer, I got lost.

In Section Seekers of Perl Wisdom