in reply to Re: How do I capture the last character in a string?
in thread How do I capture the last character in a string?

my ($char) = unpack sprintf("x%d A", length($string)-1), $string;

[download]

Makeshifts last the longest.

In Section Seekers of Perl Wisdom