ファイルシステムへ動的なアクセスは出来ない ビルド時にリソースとして読み込む（リソースバンドルもビルド時？） コードを再利用したければすべてネットワーク越しに取るしかない（インタフェース必須） 全てオブジェクトとして扱えるけど、場合によっては…

# cpan File::List # cpan Set::Array $list = dir.list; foreach $entry ($list){ $date = $entry.substring(3,4) $set->add(date=>$date, entry=>$entry) } $set{date}->sort(desc); $idx= btreeFind($currenttime-2 >= $set{date}); $sortedList = $set->…