Just to give a little code to show what lhoward is saying

my $length = 1000;
read (FILEHANDLE, my $varWithChar, $length);
my @array = split //, $varWithChar;

foreach (@array){
     #do stuff with $_
}
[download]

--BigJoe