Question

当我正在研究cgi perl时，我正在尝试对齐两个序列并在网页上打印它们的输出，但它们可能是这部分的一些问题，因为我没有在网页上获得我想要的输出格式。如果我尝试在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";`

input1 YLGGAILAEVIGTTLMKFSEGFTRLWPSVGTIICYCASFWLLAQTLAYIPTGIAYAIWSG

input2 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

在我的网页上，我正以这种方式

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

Answer 1

您要返回哪种内容类型标题？如果您告诉浏览器需要HTML，那么它会将您的数据解释为HTML并忽略任何空格（包括换行符）。

如果您要发送纯文本，则应发送内容类型的text / plain。

Answer 2

您没有输出.txt文件，但是，您尝试输出HTML，因此您必须输出HTML标记，例如＆lt; p＆gt;，＆lt; br /＆gt;和＆lt; pre＆gt;正确地构建它。将整个输出包装在＆lt; pre＆gt;中标签应该得到你想要的东西，在这里，I.e。添加：

print "<pre>\n";

一开始，并且：

print "</pre>\n";

最后，最好是完整的＆lt; html＆gt;和＆lt; body＆gt;除此之外的标签。

Answer 3

感谢paul-griffiths和Dave Cross分享您的知识。如前所述，我使用了<Br>和<p>标签，但我在对齐显示时出现了同样的错误...最后，用<pre>标签解决了我的问题....再次感谢.. ..

PERL CGI网页上的空间模式

3 个答案: