0

私はcgi perlに取り組んでいるので、2つのシーケンスを整列させてそれらの出力をWebページに出力しようとしていますが、Webページで目的の形式の出力が得られないため、この部分に問題がある可能性があります. この出力をtxtファイルに出力しようとすると、希望どおりに正しく表示されます。

問題のあるコード

print "[$id]\n";
print "Length = $M\n\n";
print "Score = $bitS bits ($S), Expect = $Eval\n";
print "Identities = $matchnum/$totlen ($ipct%), Positives = $sim/$totlen ($Ppct%), Gaps = $gapnum/$totlen ($Gpct%)\n\n";
print "Query ";
print "$_"foreach @align1;
print "\n";
print "      ";
print "$_"foreach @homol;
print "\n";
print "Sbjct ";
print "$_"foreach @align2;
print "\n\n\n";`

入力1 YLGGAILAEVIGTTLMKFSEGFTRLWPSVGTIICYCASFWLLAQTLAYIPTGIAYAIWSG

入力2 MKWLILVLGILSNASASVLVKYAMLPPRRFPSLADPMAALSNWPFWLGLALYGGAFLLYA

出力は次のようになります:

Score = 82.4 bits (202), Expect = 3.973330e-025
Identities = 40/40 (100.0%), Positives = 40/40 (100.0%), Gaps = 0/40 (0.0%)
Query MTDTTLPPGGDAADRVEPVDIQQEMQRSYIDYAMSVIVGR

      ||||||||||||||||||||||||||||||||||||||||

Sbjct MTDTTLPPGGDAADRVEPVDIQQEMQRSYIDYAMSVIVGR

私のWebページのように、私はこのようになっています

Score = 82.4 bits (202), Expect = 3.973330e-025 Identities = 40/40 (100.0%), Positives = 40/40 (100.0%), Gaps = 0/40 (0.0%) Query MTDTTLPPGGDAADRVEPVDIQQEMQRSYIDYAMSVIVGR  |||||||||||||||||||||||||||||||||||||||| Sbjct MTDTTLPPGGDAADRVEPVDIQQEMQRSYIDYAMSVIVGR
4

3 に答える 3

5

What content-type header are you returning? If you tell the browser to expect HTML, then it will interpret your data as HTML and ignore any whitespace (including newlines).

If you're sending plain text, then you should send a content-type of text/plain.

于 2013-05-23T12:12:07.833 に答える