パステル・ミディリン日記

| プロフィール
コメントが一番多い記事（233コメント）：人の心理の裏をかくホームページ集客術：リピータになってもらうためには
ツイートが一番多い記事（94ツイート）：ちょっと待て！twitterやfacebookに子供の写真を掲載する親達への警告
いいねが一番多い記事（574いいね）：facebookスパムに要注意。なりすましの見分け方とアカウント乗っ取りの手口（2013年度版）

[ カテゴリー » Perl（CGI） ]

エントリー 19 件中 11-19 件を ボックス表示 ⇔ リスト表示

前の 10 件 | Main

カテゴリー » Perl（CGI） November 07, 2005

ディレクトリ作成(Perl) `ID:1131339045`

mkdirを使う
http://perl.misty.ne.jp/12.html#a

— posted by midilin @ 01:50PM

カテゴリー » Perl（CGI） November 07, 2005

ディレクトリの中を表示するCGI(perl) `ID:1131338863`

http://script.lovely.to/bbs/infolng.cgi?print+200411/04110003.txt

#! /usr/local/bin/perl

print "Content-type: text/html\n\n";

opendir(DIR, "./");
@dir_array = readdir(DIR);
closedir(DIR);

foreach (@dir_array) {
next if $_ eq "." or $_ eq "..";

if(!opendir(DIR, "$_")){
print "$_
\n";
}
}

— posted by midilin @ 01:47PM

カテゴリー » Perl（CGI） June 24, 2005

CGIから別のCGIへ値を加工して渡す方法 `ID:1119596779`

http://www.gac.jp/article/index.php?stats=question&category=10&id=12387&command=msg&page=all

— posted by midilin @ 04:06PM

カテゴリー » Perl（CGI） October 09, 2004

CGI（Perl）でデータベースにアクセスする方法 `ID:1097249660`

DBIモジュールというものがインストールされている必要あり。

・サンプルプログラム

use DBI;

$user = '●●●';
$passwd = '▲▲▲';
$db = DBI->connect('DBI:mysql:ＤＢ名:ドメイン名', $user, $passwd);

#SQL文
$sth = $db->prepare("SQL文");
$sth_in ->execute;

$sth->finish;
$db->disconnect;

・参考URL

http://www.atmarkit.co.jp/flinux/rensai/mysql04/mysql04a.html

— posted by midilin @ 12:34AM | Comment (0) | TrackBack (0)