Re: Re: Re: TIMTOWTDI


Your skill will accomplish what the force of many cannot
	PerlMonks

Re: Re: Re: TIMTOWTDI

by rkg (Hermit)

on Sep 11, 2003 at 10:38 UTC ( #290635=note: print w/replies, xml )

Need Help??

in reply to Re: Re: TIMTOWTDI
in thread LCCS time complexity

Thanks for the $text =~ s/\[[^\]]*\]/ /g; tip; that is better. As for the /m on these

 
$text =~ s/^\s+//;
$text =~ s/\s+$//;
[download]

I think I'd put the /m on the third RE

$text =~ s/\s+/ /m; #yes?
[download]

so taken together the triple REs mean: "remove leading whitespace, trailing whitespace, and make all interior whitespace (even across line breaks) into single spaces".

Many thanks for the OT-but-useful teaching!

rkg

Comment on Re: Re: Re: TIMTOWTDI Select or Download Code

Replies are listed 'Best First'.
Re: Re: Re: Re: TIMTOWTDI by tachyon (Chancellor) on Sep 11, 2003 at 10:54 UTC
The /m only modifies the match behaviour of ^ and $ letting them match the begining and end of any line rather than entire string. It has no effect on the final RE which just needs a /g to do all interior whitespace. cheers tachyon s&&rsenoyhcatreve&&&s&n.+t&"$'$`$\"$\&"&ee&&y&srve&&d&&print	[reply]

In Section Seekers of Perl Wisdom

Domain Nodelet^?

www.com | www.net | www.org

Node Status^?

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

Chatterbox^?

How do I use this? | Other CB clients

Other Users^?

Others exploiting the Monastery: (7)

As of 2023-03-24 10:21 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Voting Booth^?

Notices^?