$a = new Sequence::Nucleotide('gattttcccgaggagagag');
  $b = new Sequence::Nucleotide('ccccgggatttccggat');
  $c = $a . $b;
  $b = "gatcgatcgaga" . $b;
  $a .= $c;

Example 4: Using the concatenate operator.