0

$dna1 と $dna2 の 2 つの文字列があります。2 つの文字列を連結されたものとして出力し、連結された文字列の最後に 2 番目の文字列をそのコピーの上に並べて出力します。たとえば、入力文字列が AAAA と TTTT の場合、次のように出力します。

AAAATTTT
    TTTT 

これは自習用の質問です。宿題ではありません。

インデックス #!/usr/bin/perl -w を使ってみた

$a ='AAAAAAAAAATTTTTTTTT';
$b ='TTTTTTTTTT';
print $a,"\n";
print ''x index($a,$b),$b,"\n"; 

しかし、必要に応じて機能していません。助けてください

4

2 に答える 2

2

返されているものを確認することから始めます...おそらく、実際に含まれているindex($a,$b)を選択する必要があります!$b$a

次に、空の文字列の 10 個のインスタンスを連結すると、10 個のスペースではなく、空の文字列になることに注意してください。

于 2013-02-05T22:28:01.770 に答える
2

これはちょっとした楽しいエクササイズです。これは私がしました:

perl -lwe'$a="AAAA"; $b="TTTT"; $c = $a.$b; $i = index($c,$b) + length($b); 
          print $c; printf "%${i}s\n", $b;'
AAAAAAATTTT
       TTTT

一般的に言えば、変数名$aを使用する$cことは悪い考えであり、ワンライナーであるため、ここでのみ受け入れられることに注意してください。$a$bは、 で使用される予約済みの変数名でもありますsort

于 2013-02-05T22:46:26.307 に答える