Help for this page
@$spr_hash{$file_name} = <FH>;
@{$spr_hash{$file_name}} = <FH>;
use strict; use warnings; ... @$spr_hash{$file_name} = qw(1 2 3); print Dumper [ %spr_hash ];