Hi all, I have a multifasta file with me and i have used awk command in my perl script to split that into separate fasta files in the working directory.However , I have a question as to reading all those files and storing each sequence in a hash.

 my $genome_file = @ARGV[0];
open(MULTIFASTA,"<",$genome_file) or die "Can't open $genome_file!\n";

my $header;
my $sequence;
$/ = "\n";
my %hash;

my @fasta = `awk '/^>/{f=++d".fasta"} {print > f}' $genome_file`;
[download]

Then i want to read each individual fasta file generated in my directory and store the sequence in a hash.I really appreciate any help.Thanks