perl - 入力中にFASTA形式のファイルから最初の行を削除するにはどうすればよいですか？

Question

FASTAファイルから入力中の最初の行を削除して、プログラムが入力としてアミノ酸配列のみを取得するようにします。

FASTAファイルの最初の行はで始まり>、シーケンスの「アクセッション番号」とそのソースが含まれています。例えば：

>MCHU - Calmodulin - Human, rabbit, bovine, rat, and chicken    
ADQLTEEQIAEFKEAFSLFDKDGDGTITTKELGTVMRSLGQNPTEAELQDMINEVDADGNGTID 
FPEFLTMMARKMKDTDSEEEIREAFRVFDKDGNGYISAAELRHVMTNLGEKLTDEEVDEMIREA 
DIDGDGQVNYEEFVQMMTAK*

Answer 1

で始まる行をスキップ>:

while(<>) {
    next if /^>/;
    # ...
}

または、$.(現在の入力行番号) を使用して最初の行をスキップします。

while(<>) {
    next if $. < 2;
    # ...
}