Changeset 10350

Timestamp:

04/24/08 22:44:06 (5 years ago)

Author:

tokuhirom

Message:

added comments.

Files:

• lang/perl/HTTPx-Dispatcher/trunk/lib/HTTPx/Dispatcher/Rule.pm (modified) (2 diffs)

lang/perl/HTTPx-Dispatcher/trunk/lib/HTTPx/Dispatcher/Rule.pm

@@ -17 +17 @@
 }
 
+# compile url pattern to regex.
+#   articles/:year/:month => qr{articles/(.+)/(.+)}
 sub compile {
     my ($self, $pattern) = @_;
@@ -32 +34 @@
 sub match {
     my ($self, $uri) = @_;
-
-    # articles/:year/:month => qr{articles/(.+)/(.+)}
 
     if ($uri =~ $self->re) {