2010年9月21日火曜日

perlで文字列の反転

良く演習問題である文字列の反転 (例 "ABCDEF" を "FEDCBA" と反転させる)という問題が出題されますが、Perlであれば簡単です。 たった一行でループもありません。 もちろん、処理は自前でループをするより負担が低いです。

#!/usr/bin/perl

#perlで文字列反転

#普通に文字列を代入
my $normal_txt = 'abcdefghijklmnopqrstuvwxyz!';

#文字列を反転
my $rev_txt = scalar reverse $normal_txt;

#反転させた文字を表示
print $rev_txt;



書かれている記事
←166ページ

0 件のコメント:

コメントを投稿