in reply to insert element into an array
File reader code my ($in,$KKK); while( sysread(IN,$in,length(hello)) ) { $KKK .= $in; } my @R = map{ [ split /\s+/ ] }split /\n/, $KKK; [download]