最終文字列にNを入れるにはどうしたらよいですか？perl、bioinformatics

私はperlの初心者なので問題がありますスクリプトを書く 私が以前にチェックした長さで、文字Nを基礎にして一定の回数だけ入れるスクリプトが欲しいのです。このNは、.txt内の文字列の最後になければなりません。この文字列は > そしてその「顔」を持っています：

A1_23ABR2014_53_CC07.P10R_E07_009.ab1

attgccttttgctagcttatagaataataattcatataaacaaaaaatat
tttatattatttaaaaataaataaaccaaataaagtcattgttgatccaa
ttgaacaaatcatattccatccatttaaagcgtctggataatcaggaata
cgtctaggcattacattaaatccaagaaaatgcataggtaagaatgttaa

私はすでにそれを書きました、しかし私は次にどうするべきかわからない。

if $qend > $sendi{
my $leg1 = $qendi - $sendi;
open(my @final, ">>", "contiggeral.fasta") or die;
while (N < $leg1) {
do N++ in @nomecontig
}

私の悪い英語のためにありがとうと申し訳ありません。

回答：

修飾子でない場合の条件 if かっこで囲む必要があります。変数はsigilで始まらなければなりません（Nには何もありません）。ありません in Perlの演算子です。

my $string = "abc";
my $final_length = 20;
$string .= "N" x ($final_length - length $string);
print $string, "n";