in reply to Re^2: split a line by control ^D character
in thread split a line by control ^D character

You're welcome. One more thing I noticed is that you will probably want to add a line:

chomp @arr;
right after my @arr = <$FILE>; to avoid the last field on each line containing a newline.