Parser Locale in ruby.rb

%w("en", "en_US", "_US", "en__POSIX", "en_US_POSIX", "zh-rCN" , "zh-r").each do |locale|
  puts locale
  if(locale =~ /^([^-_]+)[-_]?r?([^-_]+)?[-_]?([^-_]+?)$/)
    puts "$1=#{$1},$2=#{$2},$3=#{$3}"
  end
end

output
"en",
$1="en",$2=,$3=,
"en_US",
$1="en,$2=US",$3=,
"_US",
$1=",$2=US",$3=,
"en__POSIX",
$1="en,$2=,$3=POSIX",
"en_US_POSIX",
$1="en,$2=US,$3=POSIX",
"zh-rCN",
$1="zh,$2=CN",$3=,
"zh-r"
$1="zh,$2=,$3="