RE: Regexes vs. Maintainability

[japhy]

Well, I'll say you're going a bit overboard with the whitespace before your regex there... but anyway.

Break your regex into parts:

$d5 = qr/\d{0,5}/;
$d6 = qr/\d{1,6}/;
$d7 = qr/\d{1,7}/;

$number =~ m{( $d5\.$d6 | $d6\.$d5 | $d7 )};

$_="goto+F.print+chop;\n=yhpaj";F1:eval

[Ovid]

Hmm... I had posted this in discussion, since seekers didn't seem appropriate. Ah well.

I like your version of the second regex. Not sure about the comment regarding going overboard on the whitespace. I prefer the extra whitespace because I feel the indentation adds clarity (especially in the comments, oddly enough). Too many programmers just throw things to gether with little or no explanation. I err on the side of overcommenting, but my programs are, I think, much easier to understand.

What don't you like about the whitespace?

Cheers,
Ovid

Join the Perlmonks Setiathome Group or just go the the link and check out our stats.

[japhy]

You were indenting REALLY far in. It just made it seem more trouble than it was worth. If you use tabs in your actual code, you may want to consider changing to two or four spaces instead.

$_="goto+F.print+chop;\n=yhpaj";F1:eval