Skip Menu |

This queue is for tickets about the WWW-RobotRules-Extended CPAN distribution.

Report information
The Basics
Id: 77189
Status: new
Priority: 0/
Queue: WWW-RobotRules-Extended

Owner: Nobody in particular
Requestors: tvilliers [...]

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)

Subject: WWW-RobotRules-Extended-0.02
Date: Mon, 14 May 2012 10:07:11 +0100
To: bug-WWW-RobotRules-Extended [...]
From: Tielman de Villiers <tvilliers [...]>
Download (untitled) / with headers
text/plain 834b
Hello, The regexp replacement for literal "." at the bottom means "$rule=~ s/\*/\.*/g" gets double escaped, so moving it to before "*" solves the problem: --- /home/ubuntu/.cpanm/latest-build/WWW-RobotRules-Extended/lib/WWW/RobotRules/ 2011-12-24 16:55:21.000000000 +0000 +++ /usr/local/share/perl/5.12.4/WWW/RobotRules/ 2012-05-14 08:51:43.742878108 +0000 @@ -183,11 +183,11 @@ # for instance : /shared/* => ^\/shared\/.* my $rule = "^".$allowdisallow; $rule=~ s/\//\\\//g; + $rule=~ s/\./\\./g; $rule=~ s/\*/\.*/g; $rule=~ s/\[/\\[/g; $rule=~ s/\]/\\]/g; $rule=~ s/\?/\\?/g; - $rule=~ s/\./\\./g; if (length $allowdisallow) { if ($is_me) { Thanks, --tvilliers

This service is sponsored and maintained by Best Practical Solutions and runs on infrastructure.

Please report any issues with to