2005-01-06から1日間の記事一覧
今書いているCGIは、仕様上日本語名のディレクトリを作ってしまいます(ユーザーに直接アクセスはさせない)、CGIしかアクセスしないし、問題ないとは思いますが…。 むりなら通し番号でファイルやディレクトリを作る方法もあるんですけど…。 日本語も結局文字…
DelphiのExtractFileName(ファイルパスからファイル名のみを抽出)に相当する正規表現 s/(.+)[\\\/]([^\\\/]+)/$2/ かなりインチキっぽい気がしますが、ちゃんと動きました(^^;たぶんUNIX環境下でも動く…かな。 $SELFFILE = $0; $SELFFILE =~ s/(.+)[\\\/]([^…
my($filename) = @_; my(@lines); if(open(FILE, $filename)) { # ファイルロード #@lines = ; foreach(){ push(@lines, $_); } close FILE; return @lines; }else{ return (); } このようなコードでファイルを読み込んで配列にしまう場合、 foreach()は、改…
Perlは記号だらけなので、気を抜いているとすぐ何がなんだか分からなくなります。 対応する括弧を強調表示するエディタを使えば見やすかったかな…(^_^; サブルーチンに配列やハッシュリストを渡したい場合、リファレンスで渡さなければならないようですが、…