my %filehandles; open $filehandles{$_}, $_ for @files;