close(filehandle); #close newly generated files before array call.
my @files = <substituent_R*.txt>;