[Tokyo-pm] これはどう動くの？

[Keiichi Okabe]

岡部です．

早川さんのlslR.pl スクリプトを見ていて，動きがよく
わからない箇所があります．
  http://www014.upp.so-net.ne.jp/tetryl/llw2004/

sub init_sh
{
    my $fname = shift;
    local $/ = "";
    open my $fh, $fname or die $!;
    %lslr = map {sub {substr(shift,0,-1), \@_}->(split /\n/)} <$fh>;
}

という箇所なんですが，ls -lR で作成したファイルをハッシュに
いれようとしていると思うのですが，最後の行はどう動くのでしょうか．

教えてくださいませ.

# う～ん，私がやらなくてよかった，って感じ．
# 難しいや (^^;
-- 
okabek at beige.ocn.ne.jp  岡部 恵一
成功出於衆者、先知也、先知者、必取於人、知敵之情者也
          孫子 用間篇 第十三