タグ

関連タグで絞り込む (2)

タグの絞り込みを解除

sortに関するstraight_wood55のブックマーク (2)

  • CGI-Perl 基礎編 (その三) 標準ファイル I/O open、unlink、opendir、readdir - SAK Streets

    CGI-Perl 基礎編 (その三) 標準ファイル I/O open、unlink、opendir、readdir ■open (ファイルオープン) $rcd = open(FILE, "path/filename"); | | |_ オープンモード省略 = シーケンシャル入力 | | ">path/filename" = シーケンシャル出力 | | "+>path/filename" = シーケンシャル入出力 | | ">>path/filename" = シーケンシャル追加出力 | |_ ファイルハンドル |_ オープン結果 1 (真) = 正常 その他 = エラー ■close (ファイルクローズ) close(FILE); |_ ファイルハンドル ■unlink (ファイル削除) $rcd = unlink("path/filename"); | |_ ファイル名 |_ 0 (偽)

  • 【CGI・Perl】数値の値でソートする (Perl, sort)

    CGI・Perl例文集 CGI(Perl)のサンプルプログラムをコピー&ペーストで使える便利集! カテゴリー:ソート(並べ替え) リスト(配列)  数値の値でソートする (Perl, sort) 以下のようなコードを書くと、文字列として扱われてしまい、意図した結果にならない場合がある。 @array = ( 1, 2, 3, 4, 5, 10, 11, 12 ); foreach(sort @array){ print ; print "\n" } ○実行結果 1 10 11 12 2 3 4 5 これを回避するコードは次のようなものである。 @array = ( 1, 2, 3, 4, 5, 10, 11, 12 ); #-- 昇順 --# foreach(sort {$a <=> $b} @array){ print ; print "\n" } #

  • 1