2008年11月14日

配列演算子

配列には、数値や文字列を代入することができます。
@x = (1, 2, 3); @x に 1, 2, 3 をこの順序で代入 (数値)
@y = ("apple", "orange"); @y に apple と orange をこの順序で代入 (文字列)
@z = ($a, $b, $c); @z に $a, $b, $c をこの順序で代入 (変数)


ラベル:Perl 演算子 CGI 配列
posted by wans at 23:17| Comment(0) | 配列 | このブログの読者になる | 更新情報をチェックする

全角数字を半角数字へ変換する

Jcodeモジュールを利用し、全角数字を半角数字へ変換する。
use Jcode;
print Jcode->new('1234567890')->tr('[0-9]', '[0-9]')->sjis;
「tr('[0-9]', '[0-9]')」の部分の文字コードはEUCである必要がある。プログラム全体がシフトJISの場合は、変数に入れ、その変数をEUCへ変換した後に渡せば良い。
ラベル:CGI Perl 数値
posted by wans at 22:35| Comment(0) | 数値 | このブログの読者になる | 更新情報をチェックする
×

この広告は180日以上新しい記事の投稿がないブログに表示されております。