Re: [MacPerl] TerminatorString

["Jefferson R. Lowrey" <lowrey@mailbag.com>]

At 10:34 PM +1000 8/24/99, Peta Adams - John Murray wrote:
>Running of A giving B. What can't I see?
>
>B. # Can't find string terminator "HTML" anywhere before EOF.
>File 'Hard Disk:Desktop Folder:AMP WEB DB:lsinitemtest'; Line 11
>
>A. #############
>#! perl -w
>
>open (INVITS, '<Hard Disk:Desktop Folder:AMP WEB DB:invitems.txt') or die
>('Problem with open of invitems.txt');
>print <<'HTML';
>... some stuff to print ...
>HTML
>while (defined ($readline = <INVITS>)){
>	chomp $readline;
>	$readline =~ s/~~~/<br>/g;
>	@rec = split (/:::/,$readline);
>	print <<"HTML";
>	... some stuff to print ...
>	HTML
>}
>print <<'HTML';
>... some stuff to print ...
>HTML
>############

Per your previous question, you have to move the first HTML all the way to
the left margin.

You can't have any leading spaces before the terminating string of a here doc.

-Jeff Lowrey



===== Want to unsubscribe from this list?
===== Send mail with body "unsubscribe" to macperl-request@macperl.org