Re^2: The most annoying common way to get a string literal in Perl is...

by Anonymous Monk

on Jul 02, 2004 at 22:10 UTC ( [id://371524]=note: print w/replies, xml )

Need Help??

It can. Did you try:

if($anything){
  print <<"  Ende" # =~s/  \n/\n/g #could be appended
    Text
  Ende
}
[download]

Comment on Re^2: The most annoying common way to get a string literal in Perl is... Download Code

Replies are listed 'Best First'.
Thinko! by Anonymous Monk on Jul 03, 2004 at 07:57 UTC
Sorry, sleep deprivation. The regex must be `m" (.*?)$"msg;`.	[reply] [d/l]
Re: Thinko! by december (Pilgrim) on Jul 04, 2004 at 22:36 UTC
Hey, thanks, I didn't know you could do such a direct regex on a here-document. Always something new to learn...	[reply]

In Section Past Polls

Domain Nodelet^?

Node Status^?

node history
Node Type: note [id://371524]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others surveying the Monastery: (2)

As of 2024-04-25 01:35 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Voting Booth^?

No recent polls found