Perlで任意のディレクトリにあるファイル一覧を取得する際は、いくつかの方法があります。今回はglob()とopendir()で取得する方法をご紹介します。 glob()でファイルの一覧を取得 簡単なのはglob()を使ったファイルの取得方法です。 glog()は カレントディレクトリにあるファイル名やディレクトリ名を取得することができます。 # 引数にアスタリスク( * )を指定すると、. で始まらないすべてのファイル一覧を取得 my @file = glob "*"; print join( "\t", @file ), "\n"; "* .*" . で始まるファイルも対象にする場合は引数に"* .*"を指定 my @file2 = glob "* .*"; print join( "\t", @file2 ), "\n"; glob()の引数に拡張子を指定すると、指定した拡張子のファ
Ermitejoの現在のシステム(といっても辞書引きくらいしかありませんが)は、HTMLテンプレートエンジンに、PerlのCPAN moduleであるところのHTML::Templateを使っています。 もう随分昔のことのような気がしますが、いや、むしろ事実として随分昔で恐縮なのですが、前回の記事で、Template-Toolkitに秋波を送っていました。その後、仕事の能率を上げるために自主的にJCLジェネレータの類を作ってみたり、ここでは書けませんが(Googleの20%ルールのようなものだと思ってください)しがないWebシステムの類を構築してみたりしました。 それらの活動は、趣味のプログラミング(このErmitejoです)にフィードバック出来るところがあるかなという下心も多分に含んでいたのですが、ともあれ入り口をかじってみるくらいのことは出来たように思います。結果、「物は使いよう」とい
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く