#!/usr/bin/perl

use strict;
use Locale::Country;

my $country = code2country('an', 'alpha-2');
my $code    = country2code('Netherlands Antilles', 'alpha-2');

print "$country\n";
print "$code\n";