Merge pull request #146 from freyfogle/patch-1

POD tweaks

lib/Number/Phone/Country.pm

@@ -244,18 +244,19 @@ Number::Phone::Country - Lookup country of phone number
 
   use Number::Phone::Country;
 
-  #returns 'CA' for Canada
-  my $iso_country_code = phone2country("1 (604) 111-1111");
+  #returns 'CA', '1' for Canada
+  my ($iso_country_code, $idd) = Number::Phone::Country::phone2country_and_idd("1 (604) 111-1111");
 
 or
 
   use Number::Phone::Country qw(uk);
 
-  my $iso_country_code = Number::Phone::Country::phone2country(...);
+  my ($iso_country_code, $idd) = Number::Phone::Country::phone2country_and_idd(...);
 
 or
 
-  my ($iso_country_code, $idd) = Number::Phone::Country::phone2country_and_idd(...);
+  #returns '49'
+  my $idd = Number::Phone::Country::country_code("DE");
 
 =head1 INCOMPATIBLE CHANGES
 
@@ -361,7 +362,7 @@ country.
 
 =item phone2country($phone)
 
-Returns the ISO country code (or XK for Kosovo) for a phone number.
+B<DEPRECATED> Returns the ISO country code (or XK for Kosovo) for a phone number.
 eg, for +441234567890 it returns 'GB' (or 'UK' if you've told it to).
 
 =item phone2country_and_idd($phone)