Select Code to Download

my $event_method=$event_ref->[0];
--$event_ref is an array reference
...
my @file_details=@{$event_file -> {$event_method}};
--$event_file is an hash reference
print "@file_details";

my @file_details=@{$event_file -> {gsm}};