my $copy1b = '0' . $copy1;
      my $copy2b = $copy2 . $_;
      
      $n = ($copy1b | $copy2b);