Can't find string terminator "ENDHEADER" anywhere before EOF

Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question:

Replies are listed 'Best First'.
Re: Can't find string terminator "ENDHEADER" anywhere before EOF by Enlil (Parson) on Sep 18, 2004 at 23:19 UTC
It should work fine as written provided that ENDHEADER is at the very start of a line and nothing else follows it (though I can't tell for sure as you should put <code> tags around your code so we can also see your code formatting which is important in this case). As per perlop: The terminating string must appear by itself (unquoted and with no surrounding whitespace) on the terminating line. HTH -enlil	[reply]
Re^2: Can't find string terminator "ENDHEADER" anywhere before EOF by TedPride (Priest) on Sep 19, 2004 at 01:07 UTC
Yes, he's right. The end tag has to be by itself on the line. Here's your code without errors: `sub print_chat { print <<ENDHEADER; Content-type: text/html <html> <head><title>My Chat</title> </head> </html> ENDHEADER } return 1` [download] (though I don't understand why return 1 is outside the end } ?)	[reply] [d/l]
Re^3: Can't find string terminator "ENDHEADER" anywhere before EOF by Anonymous Monk on Aug 03, 2007 at 14:47 UTC
This is usually because there are spaces before "ENDHEADER" There should not be spaces before second ENDHEADER. Regards, Ivan	[reply]
Re^4: Can't find string terminator "ENDHEADER" anywhere before EOF by Anonymous Monk on May 14, 2008 at 17:34 UTC
Re^4: Can't find string terminator "ENDHEADER" anywhere before EOF by Anonymous Monk on Dec 10, 2008 at 14:01 UTC
Re^3: Can't find string terminator "ENDHEADER" anywhere before EOF by Anonymous Monk on Dec 09, 2011 at 06:54 UTC
serioulsy its working out... there should be any space between 2nd ENDHEADER.. generally we keep tab and type. thats the exact mistake	[reply]
Re: Can't find string terminator "ENDHEADER" anywhere before EOF by Errto (Vicar) on Sep 19, 2004 at 00:27 UTC
From the HTML source for your post, it looks like the word "ENDHEADER" in your code is indented, and thus has some whitespace on the beginning of the line. Delete that and it should work.	[reply]
Re: Can't find string terminator "ENDHEADER" anywhere before EOF by The Mad Hatter (Priest) on Sep 19, 2004 at 01:50 UTC
Another option is to change the delimeter to fit what you have instead of the other way around: `sub print_chat { print <<" ENDHEADER"; Content-type: text/html <html> <head><title>My Chat</title> </head> </html> ENDHEADER } return 1;` [download] Also, wouldn't the return make more sense inside the sub?	[reply] [d/l]
Re: Can't find string terminator "ENDHEADER" anywhere before EOF by quai (Novice) on Sep 19, 2004 at 19:10 UTC
(when you correct this bug, and wonder why you get an 505 error, add a empty line after the Content-type-line)	[reply]
Re: Can't find string terminator "ENDHEADER" anywhere before EOF by Anonymous Monk on Sep 19, 2004 at 06:17 UTC
use diagnostics; print <<FOOOBAR; __END__ Can't find string terminator "FOOOBAR" anywhere before EOF at - line 2 + (#1) (F) Perl strings can stretch over multiple lines. This message me +ans that the closing delimiter was omitted. Because bracketed quotes +count nesting levels, the following is missing its final parenthesis: print q(The character '(' starts a side comment.); If you're getting this error from a here-document, you may have in +cluded unseen whitespace before or after your closing tag. A good program +mer's editor will have a way to help you find these characters. Uncaught exception from user code: Can't find string terminator "FOOOBAR" anywhere before EOF at +- line 2. [download]	[reply] [d/l]
Re: Can't find string terminator "ENDHEADER" anywhere before EOF by Anonymous Monk on Sep 20, 2004 at 14:27 UTC
First, try removing the tab/whitespace before your terminator (i.e. ENDHEADER). Second, your return is in the wrong block. should look more like this: `#!/usr/bin/perl sub print_chat { print <<ENDHEADER; Content-type: text/html <html> <head><title>My Chat</title> </head> </html> ENDHEADER return 1; }` [download] 20040920 Janitored by Corion: Added code tags	[reply] [d/l]
Re: Can't find string terminator "ENDHEADER" anywhere before EOF by Anonymous Monk on Sep 20, 2004 at 18:56 UTC
IIRC, you have to un-indent the ending ENDHEADER tag so there's no whitespace before or after it.	[reply]
Re^2: Can't find string terminator "ENDHEADER" anywhere before EOF by Anonymous Monk on Mar 09, 2010 at 17:52 UTC
That Perl says: "Can't find string terminator "" anywhere before EOF" instead of: "Help! There's some whitespace before the second one" is: TRULY PATHETIC	[reply]
Re^3: Can't find string terminator "ENDHEADER" anywhere before EOF by ikegami (Patriarch) on Mar 09, 2010 at 19:31 UTC
The behaviour can't be changed because of backwards compatibility. The best that can be done is too clearly document the trap, and that has been done. Perl 6, not constrained by backwards compatibility, does allow whitespace before the token.	[reply]
Re^3: Can't find string terminator "ENDHEADER" anywhere before EOF by Anonymous Monk on Mar 09, 2010 at 18:05 UTC
to be fair, if you place: `use diagnostics;` at the start of the code it will say: "If you're getting this error from a here-document, you may have included whitespace before or after your closing tag. A good programmer's editor will have a way to help you find these errors."	[reply] [d/l]


"be consistent"
	PerlMonks