in reply to spliting problems on $_ ?

Change the =~ to = split returns a list.

In Section Seekers of Perl Wisdom