my %stat_for = (
strength => undef,
intelligence => undef,
dexterity => undef,

);

# add your code here

print <<”END_CHARACTER”;
Strength: $stat_for{strength}
Intelligence: $stat_for{intelligence}
Dexterity: $stat_for{dexterity}
END_CHARACTER 

##</code><code>##

 #!/usr/bin/perl 
use strict;
use warnings;
use diagnostics;

my %stat_for = (
        strength => undef,
        intelligence => undef,
        dexterity => undef,
);

while ( my ( $stat_name, $randvalue ) = each %stat_for ) {
        my $randvalue = ( 1 + int(rand(6)) );
        my $randv2 = ( 1 + int(rand(6)) );
        my $true = $randvalue + $randv2;

print <<"END";
Strength: $true\n
Intelligence: $true\n
Dexterity: $true\n
END
}