Select Code to Download

print ( $common_letters[ $_ ] || "-" ) for ( 0 .. length $reference );

print ( $common_letters[ $_ ] || "-" ) for ( 0 .. length( $reference )
+ - 1 );