Two things that haven't been mentioned yet:

I guess the regular expression needs to start from right to left correct?

The regex engine always operates from left to right. The solutions provided here using the $ anchor don't change that - the regex engine is still operating from left to right, but it's only matching on the last word because of the anchor.

Trying to get the last word in a sentence

Note that "This is my list" is missing punctuation. It's unclear from your question if your sentences are already split, but if you were to process text like "I took the medicine that Dr. Wall recommended to me. It tasted like onions.", you'd want that to be split into two sentences, not three - modules like Lingua::Sentence will do that for you.

use warnings;
use strict;
use Lingua::Sentence;
use Data::Dump;

my $text = "I took the medicine that Dr. Wall recommended to me. It ta
+sted like onions.";
my $splitter = Lingua::Sentence->new("en");
my @sentences = $splitter->split_array($text);
dd @sentences;

for my $sentence (@sentences) {
    if ( $sentence =~ /\s(\w+)[^\w\s]?$/ ) {
        dd $1;
    }
    else { warn "Failed to get last word from: $sentence" }
}

__END__

(
  "I took the medicine that Dr. Wall recommended to me.",
  "It tasted like onions.",
)
"me"
"onions"

[download]

(This uses the somewhat simplistic [^\w\s] to try and match any final punctuation, it may need to be adjusted depending on the input data.)

In reply to Re: Match last word in a sentence by haukex
in thread Match last word in a sentence by Anonymous Monk

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.