>>493
それはただの無名関数。
うまくいけばこんな風に書けるようになるらしい。

usort($ar, function($a, $b){ return strcmp($a, $b); });

Perlのコードよりはだいぶ長いけど、そもそもコードの短さでPerlと勝負するのは無理。