in reply to Re: Regex question
in thread Regex question

Could also be done
m{.*/(.*)/}

Caution: Contents may have been coded under pressure.

Replies are listed 'Best First'.
Re^3: Regex question
by radiantmatrix (Parson) on Aug 19, 2005 at 16:07 UTC

    Or, to mirror the constraints in the OP's regex:

    m{^.* / ([\w-]+) / .*\.txt}x

    Also, the form:

    my $dir; $dir = $1 if ##regex_here##

    is a good idiom to become familiar with.

    Updates:

    • 2005-08.Aug-22 : fixed short-sighted error tlm points out below. I keep getting bit on that. ;-)

    <-radiant.matrix->
    Larry Wall is Yoda: there is no try{} (ok, except in Perl6; way to ruin a joke, Larry! ;P)
    The Code that can be seen is not the true Code
    "In any sufficiently large group of people, most are idiots" - Kaa's Law

      Also, the form:

      my $dir = $1 if ##regex_here##

      is a good idiom to become familiar with.

      Not with my, though. The behavior of my ... if ...; is undefined.

      the lowliest monk