Select Code to Download

my $account_hash = $accounts->{78};

...
    }

print Dumper $account_hash{ transactions };

A,01,Newton,Issac,Physics, 5.6      
B,144.56                            
...
B,25.63                             
B,89.56                             
B,7789.23

%accounts = ( 
’78’ => { 
...
’surname’ => ’Merx’, 
... 
},

use strict;
use warnings;
...
}
}
print Dumper @transactionamount;