Я пытаюсь отправить HTML-часть в виде фрагментов в HTTP-ответе с использованием сценария perl, но получаю ошибки компиляции

Ниже приведена часть сценария, который я использую для отправки HTML-страницы в виде фрагментированного ответа. Однако при запуске сценария выдает ошибки компиляции, такие как:

Найден номер, где ожидается оператор в nph-99_1_1_18.pl, строка 19, рядом со строкой "print "233 (может быть строка "бегущая многострочная", начиная со строки 18)

#! /usr/bin/perl

print "HTTP/1.1 200 OK\n";
print "Connection: Close\n";
print "Content-type:text/html\n" ;
print "Transfer-Encoding:chunked\n\n" ;
print "96\r\n";
print <<EndText;
<html>
  <!-- this chunk is 150 bytes in length-->
  <head>
         <title>Document Title</title>
  <link REL="StyleSheet" TYPE="text/css" HREF="example.css">
  </head>

<body>
EndText
print "\r\n\";
print "233\r\n";
print <<EndText;
<!-- this chunk is 563 bytes in length-->
<h1 CLASS="funkyclass" ALIGN="center">Welcome to my home page!</h1>
  <br><br>
<p>Hi there! If you are reading this then you have found my home page!  Congratulations! I know it can be hard to find my pages, but I bet that you feel lucky now. Now that you are here, please take a look at my page of links to <a HREF="http://www.mysite.com/coolsites.html">cool sites</a> or sign my <a HREF="http://www.mysite.com/guestbook.html">guest book</a></p>
<div CLASS="foo"> My wonderful poetry <br> is available if you are REALLY bored. Why not give it a spin?</div>
EndText
print "\r\n\";
Источник

1 ответ

Решение

Там есть люфт \ в одном из ваших print заявления. Есть еще один, где вы также скопировали эту строку ниже. Избегает закрытия ", так что все после него интерпретируется как строка.

<body>
EndText
print "\r\n\"; # <--- HERE (and also further down)
print "233\r\n";

Вы пишете свой код с помощью редактора /IDE с подсветкой синтаксиса? Включите его и заставьте струны торчать. Таким образом, он выделит вам все после того, как бежал " как строка, и вы не пропустите это снова.

Кроме того, вы должны use strict а также use warnings,

Источник
Другие вопросы по тегам