How not to remove trailing empty strings from an array

Just a quick note to document a funny error.

I tried to remove trailing empty strings from an array of strings with the following code.

    pop @msgstr while !length($msgstr[-1]);
[download]

This didn't work. Can you guess why? Solution under the fold.

This is an infinite loop if @msgstr contains only empty strings.

Comment on How not to remove trailing empty strings from an array Select or Download Code

Replies are listed 'Best First'.
Re: How not to remove trailing empty strings from an array by Neighbour (Friar) on Apr 16, 2013 at 14:32 UTC
Close, but subtly different (imho), it <Reveal this spoiler or all in this thread>	[reply] [d/l] [select]
Re^2: How not to remove trailing empty strings from an array by ambrus (Abbot) on Apr 16, 2013 at 16:51 UTC
My actual fix was <Reveal this spoiler or all in this thread>	[reply] [d/l]
Re^2: How not to remove trailing empty strings from an array by LanX (Saint) on Apr 16, 2013 at 17:21 UTC
Nope, I suppose ambrus also wants to strip trailing ... ... undefs Cheers Rolf ( addicted to the Perl Programming Language)	[reply]
Re: How not to remove trailing empty strings from an array by LanX (Saint) on Apr 16, 2013 at 17:17 UTC
the problem comes from ... ...stringification of undef to "" I thought <Reveal this spoiler or all spoilers in this node or all in this thread> could solve this, but no chance. Cheers Rolf ( addicted to the Perl Programming Language)	[reply] [d/l]