以前のリビジョンの文書です


A PCRE internal error occured. This might be caused by a faulty plugin

====== 文字列を一文字ずつ分割する(半角のみ) - Perl ====== ~~socialite~~ //※この記事は2007年03月04日に書かれた物です// 文字列を分解し、1文字ずつ処理を行いたい。半角、1バイト文字のみ(英数字など)だけなら、標準のsplit関数を用いれば良い。 splitの分割条件で何も指定しないと、1byteずつ分割してくれる。 ===== サンプル ===== <code perl> ;# ;#文字列を1文字ずつ分割する (半角のみ) ;# #-- 分割 --# @char = str2char('Hello! World'); #-- 表示 --# foreach my $c (@char){ print "$c\n"; } #--------------------------------------- #1byteずつ分割する #--------------------------------------- sub str2char{ my $str = shift; return( split(//, $str) ); } </code> ===== 実行例 ===== <code> H e l l o ! W o r l d </code> ===== 関連書籍 ===== {{amazon>jp:4873113148}} <html><p style="clear:both"></p></html> {{amazon>jp:4798139815}} <html><p style="clear:both"></p></html> {{tag>CGI・Perl例文集 Perl 文字列}} ~~socialite~~

コメント

コメントを入力. Wiki文法が有効です:
Q U D J H