Help for this page
Select Code to Download
Select
or
download this
> perl -e '$_="haba\N{U+263A}ugo"; $n= m/(\N{U+263A})/; print $n;' 1