Help for this page
my $String = " something, something, something, this "; my ( $LastWord ) = $String =~ m/(\w+)\s$/;