Re^4: Perl module search engine

Could you please provide an example?

perl -wle '$_="abc" x $ARGV[0]; m/(((.){1,20}.+){1,34}){2,4}[d]/' 10
[download]

And now tell me how long your perl takes to find out that this regex fails ;-)

$ARGV[0] time in s

3 0.003

4 0.016

5 0.167

6 2.0

7 23.8

8 146

I wasn't patient enough to see how long it takes to match with $ARGV[0] == 9, or in other words against 27 characters of input.

Comment on Re^4: Perl module search engine Select or Download Code

Replies are listed 'Best First'.
Re^5: Perl module search engine by jacques (Priest) on Jun 15, 2008 at 22:17 UTC
Yes, it's a problem. I just tested your example. I am going to have to figure out a way to sniff it out and upload a new version. Maybe I should just not allow regexps? Thanks for the info.	[reply]