如何创建包含键 => 文件名、值 => 文件内容的 %hash？

Question

例如，我有 1 个文件8854

文件竞赛是：

ABCSDESG

Answer 1

my $file = '8854';
my %hash = ( $file => `cat $file` );