in reply to Extract last two digits from numbers

Assuming the number is at the end of the variable being matched, use: /\d{2}$/. the '\d' means match digits, the '{2}' means two exactly, and the '$' means end of line. Other option: /\d\d$/ (simpler).

Update: Note that L~R's regex is more specific (putting '^' first means start of line) while tachyon's regex is more relaxed, finding any 4 digit number and capturing its last two digits (using parentheses).

Another update: See L~R's reply below.

  • Comment on Re: Extract last two digits from numbers

Replies are listed 'Best First'.
Re: (2) Extract last two digits from numbers
by Limbic~Region (Chancellor) on Jan 06, 2004 at 10:23 UTC
    yosefm,
    finding any 4 digit number and capturing its last two digits

    Just to be clear, tachyon's regex will match the last two digits of the first set of digits in a string that are at least 4 digits long

  • "The cat 1234567 in the hat"
  • 1234
  • "Just like 3456789 he was 12345"

    Cheers - L~R

    Update: As duff points out below, I am an idiot. My above statement would be correct if the regex had been /\d\d(\d\d)\b/

[reply]
      Just to be clear, tachyon's regex will match the last two digits of the first set of digits in a string that are at least 4 digits long

      That's not clear at all because that's not what his regular expression does. What it does is match the second pair of the first sequence of 4 digits within a string. Here's tachyon's code again: my ($digits)= $str =~ m/\d\d(\d\d)/; and here is what your examples should have looked like:

      • "The cat 1234567 in the hat"
      • 1234
      • "Just lie 3456789 he was 12345"

      duff

[reply]
[d/l]
        duff,
        That's what I get for trying to type what my brain is thinking after spending nearly 36 hours traveling half way around the world with only a few hours sleep. You are most correct. I was thinking about modifying my ^ and $ anchors to \b and somehow saw them in tachyon's code. They are obviously not there and I obviously need more sleep.

        Salamat po (courteous form of thank you in Tagalog)

        L~R

[reply]

In Section Seekers of Perl Wisdom