ある文字のユニコードのコードポイントを調べる方法

1. 
   
   Perl
   
   
›
2. 
   
   文字コード
   
   
›
3. 
   Unicode
   
   
›
4. 
   コードポイント
   
   

　ある文字のユニコードのコードポイントを知りたい場合は、次のようにします。utf8プラグマは有効にして、ソースコードをUTF-8で保存する必要があります。

use utf8;

my $str = 'あ';

# 十六進数として表示
printf "%x\n", ord($str);

　ord関数で文字のコードポイントを知ることができます。printf関数で%xというフォーマット指定をして16進数で表示しています。

　出力結果は以下のようになり「あ」という文字のコードポイントは3042であることがわかります。

3042

Data::Dumperで簡易的に調べる

　Data::Dumperモジュールを使って簡易的に調べる方法もあります。Data::DumperはASCIIの範囲でない文字であれば、内部文字列を出力するときに、コードポイントに変換するからです。

use utf8;

my $str = 'あ';

use Data::Dumper;
print Dumper $str;

　以下のようにユニコードのコードポイントが16進数で出力されます。

$VAR1 = "\x{3042}";