http://qs321.pair.com?node_id=649239

princepawn has asked for the wisdom of the Perl Monks concerning the following question:

Given an alternating regexp: 
my $RE = qr! \b ( SA | NV | LTD | CO | LLC ) \b !ix ;

[download]
How would you say: delete any and all of these from the end of the string, leading to 
Bobs Warehouse SA LTD => Bobs Warehouse
Jims Fine Wines CO LLC => Jims Fine Wines

[download]

Ivan Raikov says: the first step to understanding recursion is to begin by understanding recursion.

Back to Seekers of Perl Wisdom