From 875b87667bc367908c46fe2c2e61b5e2f4089a37 Mon Sep 17 00:00:00 2001 From: franck cuny Date: Thu, 24 Jun 2010 16:32:09 +0200 Subject: fix regex --- lib/MooseX/Net/API/Meta/Method.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lib/MooseX') diff --git a/lib/MooseX/Net/API/Meta/Method.pm b/lib/MooseX/Net/API/Meta/Method.pm index ddd84f9..d2c9ab1 100644 --- a/lib/MooseX/Net/API/Meta/Method.pm +++ b/lib/MooseX/Net/API/Meta/Method.pm @@ -198,10 +198,10 @@ sub _build_path { $path =~ s/(?:\$|:)$match/$value/; } if ($max_iter > $i) { - $path =~ s/(?:\/)?(?:$|:)(?:.*)$//; + $path =~ s/(?:\/?(?:$|:).*)$//; } } - $path =~ s/(?:\/)?(?:$|:)(?:.*)$//; + $path =~ s/(?:\/?(?:$|:).*)$//; return $path; } -- cgit 1.4.1