Title: Extract the Korean language (Hangul) codes
Submitter: Jong-Pork Park (other recipes)
Last Updated: 2001/05/30
Version no: 1.0
Category: Miscellaneous

Description:

This regular expression extracts hangul (Korean Language) codes from web pages.

Usage: Text Source

$hangul = '안녕하세요? 제 이름은 Park, Jong-Pork 입니다.';
@hangul = ($hangul =~ /((?:[\xA0-\xFE]{2})*)/isg); # extract hangul
$hangul = "@hangul";
$hangul =~ s/([\xA0-\xFE]{2})([\x7F-\x9F]{1})/$1/isg; # correct noise
$hangul =~ s/[A-z]{1,}//isg; # remove English
$hangul =~ s/\s*//isg; # remove white space

print $hangul;

The license for this recipe is available here.

Discussion:

This regular expression was used in a Korean-language world wide web search engine.