シリコンバレー在住エンジニアの、Perl、PHP、AJAX、Drupal、Java の小枝集です。( 7,833,056 since 2005.02.20 )
PHP で、ディレクトリの中のファイル名を取得する方法
こんな感じ。
!ereg('(^\.$)|(^\.\.$)', $file) とある行は、カレントディレクトリ（.）と、親ディレクトリを除いて処理するためのもの。
$filename[] の配列中に、ファイル一覧が入る。
こんな感じ。
!ereg('(^\.$)|(^\.\.$)', $file) とある行は、カレントディレクトリ（.）と、親ディレクトリを除いて処理するためのもの。
$filename[] の配列中に、ファイル一覧が入る。
<?php
$dir_path = 'your_directory';
$filename = array();
$dir = dir($dir_path);
while($file = $dir->read()) {
if(!ereg('(^\.$)|(^\.\.$)', $file)) {
$filename[] = $file;
}
}
$dir->close();
?><?php
$dir_path = 'your_directory';
$filename = array();
$dir = dir($dir_path);
while($file = $dir->read()) {
if(!ereg('(^\.$)|(^\.\.$)', $file)) {
$filename[] = $file;
}
}
$dir->close();
?>
Drupal で、カウンタを作ってみた。
なぜか Drupal にありそうでないのがカウンタ。いまどきカウンタなんて・・・などという声が聞こえてきそうだが、Google Analytics でアクセスログ取っていてもカウンタは欲しかったんですよ。自分のブログ継続モチベーション維持のために（苦笑）。なさそうなのでなので作ってみた。
なぜか Drupal にありそうでないのがカウンタ。いまどきカウンタなんて・・・などという声が聞こえてきそうだが、Google Analytics でアクセスログ取っていてもカウンタは欲しかったんですよ。自分のブログ継続モチベーション維持のために（苦笑）。なさそうなのでなので作ってみた。
Drupal で、モジュールから自身のサイトの URL を取得する方法（base_path()、$base_url）
settings.php で $base_url を設定したはずだから、サイトの URL はモジュールのどこからでも
といったように呼び出せるはずだ。
settings.php で $base_url を設定したはずだから、サイトの URL はモジュールのどこからでも
といったように呼び出せるはずだ。
<?php
global $base_url;
print $base_url;
?><?php
global $base_url;
print $base_url;
?>
Perl で、画像のサムネイルを作成してブラウザから表示させる方法
以下のサンプルファイルを image.cgi と名前を付けて保存、アクセス権を chmod +x image.cgi とかして ブラウザから https://yourname.com/image.cgi とかにアクセスすればよい。
注意点としては、このスクリプトは画像しか表示できないことである。これと一緒に HTML ファイルを表示しようと思っても、HTTP プロトコルの仕様上不可能である。なぜかというと HTTP プロトコルを通して画像を表示する場合は、すでにこのスクリプトが HTTP ヘッダとして Content-type: image/jpeg を最初に出力してブラウザが受け取っているからで、このスクリプトの中で同時に（画像を表示した後に） HTML 文書を表示させようとて Content-type: text/html を出力（print "Content-type: text/html\n\n）してもブラウザは受け付けてくれないのである。
#!/usr/bin/perl
use GD;以下のサンプルファイルを image.cgi と名前を付けて保存、アクセス権を chmod +x image.cgi とかして ブラウザから https://yourname.com/image.cgi とかにアクセスすればよい。
注意点としては、このスクリプトは画像しか表示できないことである。これと一緒に HTML ファイルを表示しようと思っても、HTTP プロトコルの仕様上不可能である。なぜかというと HTTP プロトコルを通して画像を表示する場合は、すでにこのスクリプトが HTTP ヘッダとして Content-type: image/jpeg を最初に出力してブラウザが受け取っているからで、このスクリプトの中で同時に（画像を表示した後に） HTML 文書を表示させようとて Content-type: text/html を出力（print "Content-type: text/html\n\n）してもブラウザは受け付けてくれないのである。
#!/usr/bin/perl
use GD;
