utf8プラグマ使用時の文字列のバイト数の取得方法 - ちゃまぐの備忘録
bytesプラグマを使うことで解決する。 （11/02/12）追記しました 何もせずに length をしてみると。 use strict; use warnings; use utf8; my $str = "あいうえお"; print length $str,"\n"; 結果は文字数。 5 以下の用に bytesプラグマを使うことで、バイト数を取得できる。 use strict; use warnings; use utf8; my $str = "あいうえお"; { use bytes; print length $str,"\n"; } 結果は、バイト数 15 ブレースで囲むのは、bytesの効果が及ぶ範囲をレキシカルスコープに限定するため。 bytesは何をやってくれるのかというと… use bytes プラグマはそれの現れたレキシカルスコープの残りで文字セマンティクスを無効化し
Perlでファイルをバイナリで読む - Qiita
2017/07/03 binmodeを追加。 open my $fh, <:rawも同等。binmode($fh)なら過去のPerlとも互換がある。 テキストファイルを特に意味はないけどバイナリで読む方法。 画像ファイルとかの解析なら役に立つ。 まずは普通にテキストファイルを読む $ cat test1.pl #!/usr/bin/perl use strict; use warnings; my $file = $0; # 自分自身を読む open my $fh, "<", $file or die $!; binmode($fh); while (my $row = <$fh>) { print "read:" . $row; } close $fh; $ perl test1.pl read:#!/usr/bin/perl read:use strict; read:use warn
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
