in reply to splitting on new-line characters
Have you tried :-
my @array = split /[\n\r\l]*/, $array; [download]