sort / x.x.x.x

sort Perl

配列を(文字コードまたは数値として)ソートします。
昇順は以下です。

@list = sort {$a cmp $b} @list;

# または
# @arr = sort @arr;

降順は以下です。

@list = sort {$b cmp $a} @list;

# または
# @arr = reverse(sort @arr);

$aと$bはsort関数が使う一時域です。
このようにcmpを使うと文字コードによる整列が行われます。
数値として比較するにはcmpではなく、<=>を使います。
数値の比較にcmpを使うと文字コードによる左詰の比較が行われ、9が10より大きいと
見なされるので注意しましょう。

また、{$b cmp $a}はブロックですので、ブロック中に好きなだけ処理を記述できます。

@arr = ('post.cgi', 'index.css', 'index.html');
@arr = sort { my $mtime_a = (stat $a)[9];
              my $mtime_b = (stat $b)[9];
              $mtime_b <=> $mtime_a;
            } @arr;

この処理はカレントディレクトリにあるpost.cgi、index.css、index.htmlの3つの
ファイルの更新日時を調べ、更新日時の降順(最近更新された順)にソートします。
以下のようにサブルーチンに切り出すこともできます。

@arr = ('post.cgi', 'index.css', 'index.html');
@arr = sort by_mtime @arr;

sub by_mtime
{
  my $mtime_a = (stat $a)[9];
  my $mtime_b = (stat $b)[9];
  $mtime_b <=> $mtime_a;
}

speed / 2005.08.31 06:17

返信

アカウントを未登録の方はパスワード欄を空欄にして投稿してください。アカウントを登録済の方は、お名前とパスワードを入力すると投稿者名の末尾にが付与されます。ファイルのアップロードと記事編集は登録済みアカウントでしか行えません。ファイルサイズは20MB以内です。機種依存文字（ローマ数字など）は使えません。使えない文字は?に変換されます。疑わしい文字を使う時はPreviewで確認してください。

文字装飾

行頭に以下の記号を付与することで行単位に文字を修飾できます。

+ 行頭にプラスを書いた行は赤くなります
/ 行頭に/を書いた行は紫になります
- 行頭にマイナスを書いた行は緑になります
= 行頭にイコールを書いた行は青になります
? 行頭に?を書いた行は黄色になります
! 行頭に!を書いた行は大きくなります

いずれも行頭の記号は削除されます。
行頭に+を書きたい場合は++、赤くしたくない場合は\+と記述してください。

セミコロン(;)2個ではさんだ部分は大きくなります。
セミコロン(;)3個ではさんだ部分は斜体になります。
セミコロン(;)4個ではさんだ部分は太字になります。

%2個ではさんだ部分は取り消し線が入ります。
%3個ではさんだ部分は下線が入ります。
%4個ではさんだ部分は小さくなります。

行頭にカンマ (,) を書くと表を作れます。
カンマの前後に空白を挟むと中央寄せされます。
以下のようにします。

, 月 , 火 , 水 , 木 , 金 , 土 , 日
,/,小嶋,福原,杉山,下柳,安藤,鶴

セパレータを|（パイプ）にすることもできます。その場合は行末にもセパレータが必要です。

キーワードリンク

Wikiエントリの表題（キーワード）が本文に含まれると自動でリンクが張られます。
カテゴリが指定されている場合、この機能は同一カテゴリ内の記事のみが対象になります。

他カテゴリのキーワードにリンクしたければ以下のようにします。
[[カテゴリ::キーワード]]
例えばPHP::MySQLカテゴリに投稿された表題DBDの記事にリンクしたければ以下のようにします。
[[PHP::MySQL::DBD]]

外部リンク

外部のURLにリンクしたければ以下のようにします。
[[http://www.yahoo.com/]]
名前を付けたければ以下のようにします。
[[YahooUSA http://www.yahoo.com/]]
リンク可能なURLはhttp、https、ftpのみです。

■	■	■	■	■	■	■	■	■