Thread Bug in Perl ? (6 answers)
Opened by BrownWolf at 2003-08-28 07:41

Strat
 2003-08-28 12:18
#16191 #16191
User since
2003-08-04
5246 articles
ModeratorIn
[Homepage] [default_avatar]
[quote=BrownWolf,28.08.2003, 05:41]
Code (perl): (dl )
1
2
3
4
5
6
7
8
#!/usr/bin/perl -w
use strict;

    print<<"EOT";
    bla
    EOT

######
[/quote]
vor und hinter dem EOT duerfen/muessen zwei zeilenumbrueche kommen, sonst nichts. Deshalb verwende ich HERE-Dokumente kaum noch, sondern mehr qq~...~ (oder aehnliches):

Code (perl): (dl )
1
2
3
4
5
6
#!/usr/bin/perl -w
use strict;

    print qq~
    bla
    ~;

Dann darf halt kein ~ in der Zeichenkette vorkommen. Anstelle von ~ kann man auch (fast) jedes andere Zeichen verwenden, z.B. | # + * () [] {} <>

qq~...~ verhaelt sich wie "..."
q~...~ verhaelt sich wie '...'
perl -le "s::*erlco'unaty.'.dk':e,y;*kn:ai;penmic;;print"
http://www.fabiani.net/

View full thread Bug in Perl ?