my @array = join(' ' , keys %num) . "\n";

##</code><code>##

my @array = keys %num;

##</code><code>##

my @num = ();

##</code><code>##

while(scalar @num < 5){
  push @num, int(rand(50) + 1);
}

##</code><code>##

push(@num, int(rand(50) + 1)) for(1..5);

##</code><code>##

print join(' ' , @num), "\n";

##</code><code>##

my $sum = 0;

for(@num){
  $sum += $_;
}

print "The sum is: $sum\n";

##</code><code>##

my @num = ();

push(@num, int(rand(50) + 1)) for(1..5);

my $sum = 0;
for(@num){
  $sum += $_;
}

print join(' ' , @num), "\n";
print "The sum is: $sum\n";

##</code><code>##

my @num = ();
my $sum = 0;

for(1..5){
  my $num = int(rand(50) + 1);

  push(@num, $num);
  $sum += $num;
}

print join(' ' , @num), "\nThe sum is: $sum\n";