［Ｐｅｒｌ］初心者です。 文字列”あいうえお”が与えられたとします。EUC-JP形式になっている先頭の”あ”を 42146という数値にＰｅｒｌ上で変換するやり方を教えて下さい。末尾の"お"も同様にして当該数値に変換したいです。

手元の環境はUTF8だったので、ちょっと自信が無いですが、

↓試してみて下さい。

use strict;
use warnings;

my $str='あいうえお';

my @codes=unpack('C*', $str);
my @results;

while($#codes>0) {
	my $c=shift(@codes);
	$c=$c*128+shift(@codes) if $c>127;
	push @results, $c;
}

print join("\t", @results);

pack / unpack が使えます。

http://www.rfs.jp/sb/perl/05/pack.html