foreach @a ( @original ) {
   foreach $b ( @a ) {
      print $b;
   }
}