4 Einträge, 1 Seite |
($url_prefix = url ()) =~ s|[^/]*$||;
Quotekabel@linux:~> perl
use YAPE::Regex::Explain;
print YAPE::Regex::Explain->new ('[^/]*$')->explain ();
The regular expression:
( ?-imsx:[^/]*$ )
matches as follows:
NODE EXPLANATION
----------------------------------------------------------------------
(?-imsx: group, but do not capture (case-sensitive)
(with ^ and $ matching normally) (with . not
matching \n) (matching whitespace and #
normally):
----------------------------------------------------------------------
[^/]* any character except: '/' (0 or more times
(matching the most amount possible))
----------------------------------------------------------------------
$ before an optional \n, and the end of the
string
----------------------------------------------------------------------
) end of grouping
----------------------------------------------------------------------
kabel@linux:~>
4 Einträge, 1 Seite |