http://www.perlmonks.org?node_id=999228


in reply to Re: Is there a better way to get the Country names with help of Regax
in thread Is there a better way to get the Country names with help of Regax

It would be good to see more sample input to figure out how countries with spaces in their names should be dealt with. North Korea, Vatican City, South Sudan, Timor Leste, Papua New Guinea, etc...

perl -E'sub Monkey::do{say$_,for@_,do{($monkey=[caller(0)]->[3])=~s{::}{ }and$monkey}}"Monkey say"->Monkey::do'