Re^2: Help with Multiple line RegEx

Yes, This is good

But I think it can all be done in one liner!

Like Browser_UK suggestion.

$Rec->{$1} = $2 if ($_=~ /-+\s+show (switchname)\s+-+\n(\w+)\n\*+/mg);
[download]

Blackadder

Comment on Re^2: Help with Multiple line RegEx Download Code

Replies are listed 'Best First'.
Re^3: Help with Multiple line RegEx by gargle (Chaplain) on Oct 10, 2005 at 11:55 UTC
TIMTOWTDI It's easy to write code that a computer can read, it's not so easy to write code that a human can understand. It's a choice. The 'select' can easily be written as a single regexp. But think about later? What's easier to adapt? The single statement or the multiple statement? I, for one, like code that shows its intend, even when coding in perl ;) -- if ( 1 ) { $postman->ring() for (1..2); }	[reply]

Replies are listed 'Best First'.

Re^3: Help with Multiple line RegEx
by gargle (Chaplain) on Oct 10, 2005 at 11:55 UTC

TIMTOWTDI

It's easy to write code that a computer can read, it's not so easy to write code that a human can understand.

It's a choice. The 'select' can easily be written as a single regexp. But think about later? What's easier to adapt? The single statement or the multiple statement?

I, for one, like code that shows its intend, even when coding in perl ;)

--
if ( 1 ) { $postman->ring() for (1..2); }

[reply]