--- Henk van Ess <[EMAIL PROTECTED]> wrote:
> Dear Bob, dear all,
> 
> I followed your suggestion and installed Active Perl for a local test. If I
> run the script below, I get the following error:
> 
> Too late for "-T" option at C:\spriet.nl

Since you're running IIS, getting the "too late for -T" option means that your scripts 
are running
through ISAPI.  This will give you a performance benefit, but it also means that you 
lose the
security benefits of taint checking.  An awful tradeoff, as far as I am concerned.  
You can read a
bit more about this at http://www.perlmonks.org/index.pl?node_id=82619
 
> When I remove the first line #!/usr/bin/perl -wT
> i get the error:
> 
> Can't find string terminator  "END_HTML"anywhere before EOF at C:\spriet.pl
> line 31
> 
> Hope you can help ...

Traps with HERE docs:

1.  The final token (END_HTML), in this case, must be on a line by itself and not have 
any
whitespace before or after it.
2.  It must not have a semicolon after it.
3.  It must have at least one line after it.

Actually, the first point above is not quite true.  The following is quite valid 
(let's pretend
that periods are spaces, for a moment):

.....print.<<"....END_HERE";
.....This.will.be.printed
.....And.so.will.this
.....END_HERE

That can let you "cheat" and get around the left justification problem.

Cheers,
Curtis "Ovid" Poe

=====
"Ovid" on http://www.perlmonks.org/
Someone asked me how to count to 10 in Perl:
push@A,$_ for reverse q.e...q.n.;for(@A){$_=unpack(q|c|,$_);@a=split//;
shift@a;shift@a if $a[$[]eq$[;$_=join q||,@a};print $_,$/for reverse @A

__________________________________________________
Do You Yahoo!?
Send FREE video emails in Yahoo! Mail!
http://promo.yahoo.com/videomail/

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to