for(0..10){
    open my $fh,'<',$file or die $!;
    $hash{$_} = [<$fh>];
    close $fh;
}