sub Get_Target{
   ###Gets two random primes a creates the goal.
   my $i = @primes;
   $i++;
   my $value1 = int(rand($i));
   my $value2 = int(rand($i));
   $goal = $primes[$value1] * $primes[$value2];   
}