Ez lett a megoldás:

$orszagnev = "USA Amerikai Csendes-óceáni szigetek 581 UMI UM ISO 3166-2:U";
chomp ($orszagnev);
$poz = index($orszagnev, "\t");
$orszagnev = substr($orszagnev, 0, $poz-1);
print "$orszagnev\n"

A kimenet:

USA Amerikai Csendes-óceáni szigetek

Ui.: a tabulátor szivatott, space-nek hittem.

@ Mijo:
Van itt előttem egy ~750 oldalas könyv, de valami összeszedettebb dolog kellene, majd megnézem amit linkeltél.
Thx!

[ Szerkesztve ]