$saved_info = $fileinfo{$_} ||= [];
push @$saved_info,\@filedata;