2016-07-02から1日間の記事一覧

perl 関数 packとunpack

#入力した文字列と数値をパックして表示した後、元の文字列に戻して再表示する。 #packとunpackのテスト #pack("format", list) #unpack("format", variable) print "文字列を入力してください>"; $string = <STDIN>; chomp($string); $length = length($string); </stdin>…

perl 関数 sort

#スペース文字で区切った数値リストを整列する print "要素をスペース文字で区切った数値のリストを入力してください>"; $numbers = <STDIN>; chomp($numbers); #ソートして表示 print join(", ", sort{$a <=> $b} (split(/\s+/, $numbers))),"\n"; #実行結果 # 要</stdin>…

perl 文字列処理関数 length

#lengthのテスト print "文字列を入力してください>"; $string = <STDIN>; chomp($string); #長さを調べる print "文字列の長さ:", length($string), "\n"; #実行結果 # 文字列を入力してください>perl is a practical extraction and report language # 文字列</stdin>…

perl 文字列処理関数 chopとchomp

#chopとchompの比較 $string1 = "perl\n"; $string2 = $string1; #chopとchompをそれぞれ2回実行する chop($string1); chop($string1); chomp($string2); chomp($string2); #表示 print "chop: $string1\n"; print "chomp: $string2\n"; #実行結果 # chop: …

perl 文字列処理関数 join

#joinを使って配列の要素を合成する #配列の各要素を文字「、」で区切って表示する。 print "文字列を入力してください:"; $string = <STDIN>; chomp($string); #スペース文字で区切る @words = split(/\s+/, $string); #各要素の間に,を入れて表示 print join(","</stdin>…

perl 文字列処理関数 split 2

#split関数を使ってスペース文字の前後の文字列を取り出す print "文字列を入力してください>"; $string = <STDIN>; chomp($string); #スペース文字で2つに区切る ($pre, $post) = split(/\s+/, $string, 2); #スペース文字の前後の文字列を表示 print "最初の文</stdin>…

perl 文字列処理関数split

#split関数を使って文字列をスペース文字で区切り、配列に代入する print "文字列を入力してください>"; $string = <STDIN>; chomp($string); #スペース文字で区切る @words = split(/\s+/, $string); foreach(@words){ #各要素を表示 print "単語:$_\n"; } #実行</stdin>…

perl 文字列処理関数 printfとsprintf

#printfとsprintfのテスト #文字列 #%sは文字列を表す変換文字。%sは「私は太郎です。」に置き換えられる。 printf("文字列:\t%s\n", "私は太郎です。"); #整数 #整数値を表す%dという変換文字、0はスペースの代わりに0を入れて右揃えにする効果、 #8は整…

perl 文字列処理関数1 print

#print関数の実験 $_ = "こんにちは。\n"; #特殊変数$_を表示 print; #ファイルprint.txtをオープン open(F, ">print.txt"); #特殊変数$_をファイルハンドルFに定義付けられているファイルprint.txtに書き出す print F; close(F); #リストを表示 print("私",…

perl 文字列の置換2

#スペースで区切られた2つの入力文字列の順番を入れ替えるスクリプト $string = <STDIN>; chomp($string); #正規表現内で()を使うと、マッチング変数$&,$`,$'は無効になり、代わりに()を順番に並べた時は、マッチした内容がその順番で特殊変数$1,$2,...に入る</stdin>…