トップページ⇒php
1001コメント350KB

【Perl】初心者コーナー Part19

■ このスレッドは過去ログ倉庫に格納されています
0001nobodyさん03/01/11 13:52ID:???
初めに→「perl」その物のスレです。

1：自分はこう言う事がしたい。
2：それでこんな風にやってみたが･･･
3：それだとこんなエラーが出て上手く行かなかった。

1と3が無いと誰も答えられないよ。
良い回答は良い質問から。一緒に勉強しましょう。

あとは>>2-10にまかせた。
0112nobodyさん03/01/14 05:00ID:???
socketとかconnectとかreadとか。
0113NOBODYたん03/01/14 05:44ID:???
>>111

use LWP::Simple;
$html = get "http://www.perl.com/";

or

use LWP::UserAgent;
$html = wget("http://www.perl.com/");
sub wget
{
my $url = shift;
my $request = new HTTP::Request(GET => $url);
my $ua = new LWP::UserAgent;
my $response = $ua->request($request);
if ($response->is_success) {
return $response->content;
} else {
return undef
}
}

cf. http://search.cpan.org/author/GAAS/libwww-perl-5.68/
0114nobodyさん03/01/14 05:45ID:KVuhYobl
MXなどで集めた動画をみんなでココにUPしよう！
http://www6.ocn.ne.jp/~endou/ten.html
0115nobodyさん03/01/14 06:42ID:/jKmOe0i
>>113
ありがとうございます。
LWPを使って読めるようになりました。
作っているのは、よくある○○弁変換みたいな奴なんですが、
読み込むサイズによって過負荷になってしまいますよね。
サイズのチェック（一定量処理したらやめるような）は
どうすればいいのでしょうか。
Simpleのheadを使ってみたのですが
yahooさえcontent-lengthを返さないのでダメでした。
011611103/01/14 06:53ID:???
ん、UserAgentのmax_size([$bytes]) 、これでできそうですね。
0117nobodyさん03/01/14 07:19ID:ea2A6+p/
>>115
あまりに時間がかかりすぎるようなら、サーバーが500を返して勝手に止まるから、
それでいいじゃねえか
0118nobodyさん03/01/14 10:37ID:???
おいおい、過負荷で止まって「いいじゃねぇか」は
ないだろ。そういうCGIが増殖するから、あんまり
CGIがまともにつかえそうなところがなくなるんだよ。
0119nobodyさん03/01/14 10:39ID:???
>>107
とりあえず貧乏パーラは人にものを頼むときに「お願いします」って
言うってことを覚えとけ。

ほれ、

$ cat testdbi.pl
use DBI;
$dbn=$ARGV[0];
$dbh=DBI->connect($dbn,$ARGV[1],$ARGV[2]);
$sth=$dbh->prepare($ARGV[3]);
if ($sth->execute) {
while(@row=$sth->fetchrow_array) {
print "@row\n";
}
}
$dbh->disconnect;
1;

0120nobodyさん03/01/14 13:10ID:xMMJe1Uf
ハッシュのキーじゃなくて値でソートして、キーも値も出力したいんですけど
うまくいきません。

■スクリプトはこんな感じ
-------------------------------------
%hoge = ('unko' => 5,
'chinko' => 3,
'manko' =>9);

foreach my $k(sort{$hoge{$a} <=> $hoge{$b}}%hoge) {
print("$hoge{$k}" . "\t" . $k . "\n");
}
-------------------------------------

■出力結果はこんな感じ
-------------------------------------
9
3
5
3 chinko
5 unko
9 manko
-------------------------------------
いちおう値でソートしてくれてるんですが、目的の出力の前になぜか値の一覧が出てしまいます。
どうすればいいですか？( ´･∀･`)
0121 ◆PxAOHU.zVE 03/01/14 13:49ID:pln/ogcF
>120
%hogeの前にkeysをいれる。
0122nobodyさん03/01/15 00:32ID:AlO2VnQa
Image::Magick を使って画像を作っています。
せっかく文字出力ができるので、webdingsなどのフォントにある外字を
使おうと思ったのですが、文字の指定方法がわかりません。

普通の文字なら
$NEWIMG->Annotate( text=>'A', pointsize=>14, fill=>'#000000',
　　x=>$posX, y=>$posY, font=>'img/ariblk.ttf' );

とやればいけるのですが、使いたい文字をアクセサリの「文字コード表」
から拾ってきても「?」になってしまいます。
文字コードはわかるからそこから指定できるのではないかと思いますが
その指定方法がわかりません。
どのように指定したらいいでしょうか？
012310403/01/15 01:59ID:???
>>108
無事非キャッシュ成功いたしました。
ありがとうございました。
0124nobodyさん03/01/15 02:08ID:ybtk15GB
この子カワイイ
http://click.dtiserv2.com/Click5/1-45-2963
0125貧乏パーラー03/01/15 05:22ID:???
>>119
ありがとうサンキューです。
それってどうやってやりましたか？
0126貧乏パーラー03/01/15 05:28ID:???
DBD::PgPP使いました。
SELECTでフィールド８個以上をクエリするとエラーなります。
DBをMySQLにしてDBD::mysqlPPにしたらフィールド33個をクエリしてもOKでした
クライアント、DB共にWinXPです。
DBD::PgPPはこういう制限があるという事でしょうか？宜しくお願いします。
0127nobodyさん03/01/15 07:39ID:???
$str = "1234";を最初の２文字"12"にしたいのですが、
どうすればよろしいでしょうか。

今は、chop $str;chop $str;でやっています。
VBAでいう、left(string,2)の様な関数？はありますか？
0128nobodyさん03/01/15 07:59ID:???
substr($target_str,0,2)
VBAは良く知らんがN88BasicのMIDの感じだな。
012912703/01/15 09:02ID:???
>>128
サンクス
0130nobodyさん03/01/15 09:56ID:2BGcsgzZ
>>126
作者日本人メール汁
0131nobodyさん03/01/15 10:22ID:wVEDeB5S
管理人（私）だけが項目を設定し、来訪者に投票してもらう
という投票・ランキングcgiを設置しようと出来合いの探したところ
項目が140あるので検索機能がついたvote．cgiを探したところ、
ttp://www.c-5.ne.jp/~hamachan/cgihtm/jiten.htm
上記↑で配布されている「簡易データーベース」というものにたどり着きました。
プログラムが古いので
require './jcode.pl';
#-----------------------------------------------------------------
↑これの次の行に↓この一行を追加しました。
open STDOUT, '>-';
jcode.plも新しいバージョンに変えて、説明書きにあったとおり
「ずっこけ物知り辞典」という表示がページに出るところまでは
うまくいったのですが、実際に登録・検索しようとすると、
「ページが見つかりません」、との表示が出ます。
ちなみに、Tripodを使っています。

FTPソフトで見ると、cgi-binフォルダの中に
jiten.cgi、jcode.pl、jiten.docが入っていますが
jiten.docのファイルサイズは0になっています。
count.docファイルは生成されていないようです。

どこをどう改善すればよいのか、ご指導よろしくお願いします。
0132nobodyさん03/01/15 10:45ID:???
>>131
データファイルを別ディレクトリにしてみたら？
TripodのCGI設置の説明をちょっと読んだけど、cgi-bin 直下に画像ファイルなどは
置けないとあるので、.cgi .pl 以外のファイルは全滅なのかもしれん。

あと、ここはPerlスレだからCGIに関する質問はできるだけ他のスレでやってな。
013313103/01/15 11:00ID:???
>>132
すみません、CGIスレに移動します。
01348503/01/15 12:12ID:lPFUjXcR
>>110,101
ありがとうございます。
参照は初級者向けじゃないみたいで、例文に参照以外の
わからない箇所が多いので地道に勉強中。

ソース丸写し以外で使えるよう頑張ります。
0135山崎渉03/01/15 13:31ID:???
（＾＾）
0136nobodyさん03/01/15 14:07ID:???
perlスクリプト中で
新たなPATHを追加したいと思ったんですけど
$ENV{'PATH'} .= ';c:\hogehoge';
ではうまく行きませんでした　どうやればいいのでしょうか？
0137nobodyさん03/01/15 15:38ID:5j+QQZeA
ご近所さんみたいなメール転送の仕組みを作りたいんですが...
色んなアカウントに送られてきたメールを片っ端からＤＢに登録したいのです。
なんかいい参考書やサイトを知りませんか？

よろしくおながいしますm(_ _)m
0138vvv03/01/15 15:42ID:ZNHQB8hs
http://www6.ocn.ne.jp/~endou/index2.html
　　　　★ＹＡＨＯＯＯプロフィール★
0139nobodyさん03/01/15 18:26ID:???
>>137
スレ違い
0140nobodyさん03/01/15 19:13ID:POOF/+eY
カテゴリで検索可能なサーチエンジンやリンク集などのデータファイルは、
下記の場合、どちらが効率的なのでしょう？

１．例えばデータファイルを一つにまとめ、
登録NO<>カテゴリ<>データ
などと登録する方法

２．データファイルをカテゴリ毎に、
data1.log
data2.log ・・・
等と１カテゴリで１データファイルとする。

一つのデータファイルにまとめるとファイルが大きくなってしまい、
カテゴリ毎に分ける方が良い様な気もするのですが、
実際の所はどうなのでしょうか？
サーバー付加の大小の観点からも御指導頂ければ幸いです。

0141nobodyさん03/01/15 20:20ID:mlzRLcDE
＠tbl[100][100]；
じゃ二次元テーブルってできないのですか？
アルゴリズムを教えてください。
0142nobodyさん03/01/15 20:23ID:???
>>141　自己レス
すいません、二次元配列で検索した直ぐに分かりました・・・
はぁ・・・容易にはできないのですね。がんばって作ります。
01435803/01/15 21:20ID:???
$tbl[100][100] = 'Hello?';
print $tbl[100][100];
0144nobodyさん03/01/15 22:04ID:???
>>141
中身的にはリファレンスの配列になるけど、単にそれだけで使うなら
普通にそうやって書くだけで二次元配列になると思うが。
014514403/01/15 23:45ID:???
さすがに書けるよな…＜連書規制に引っかかってた
リストの二次元配列だから面倒だわ、忘れてくれぃ。
0146nobodyさん03/01/16 07:53ID:RDhobq0J
-$aaa=>[$bbb,$ccc]
っていうのがあるのですがこの"[]"は何をやってるのですか？
0147nobodyさん03/01/16 13:09ID:???
>>141-146
http://www.kt.rim.or.jp/~kbk/perl5.005/perlref.html
http://www.kt.rim.or.jp/~kbk/perl5.005/perllol.html
とにかく全部読め。話はそれからだ。
0148nobody03/01/16 19:36ID:6WICp0JY
$bgcolor,$backgorundなどにはbodyタグで使用される文字が入っています（文字列が入っていることは確認済み）。
そこで、それらを結合するために

$body = '<body bgcolor="'.$bgcolor.'" background="'.$background.'" text="'.$text.'" link="'.$link.' " vlink="'.$vlink.'" alink="'.$alink.'">';

と書いたのですが、なぜか$bodyが空文字になってしまいます。
超初歩だとは思いますがどなたか解決法を教えてくださらないでしょうか。
0149nobodyさん03/01/16 19:43ID:???
$body = qq(<body bgcolor="$bgcolor" background="$background" text="$text" link="$link" vlink="$vlink" alink="$alink">);

$bodyが消える理由はわからんが。
スコープ外とかいうオチじゃないかな？
0150nobodyさん03/01/16 20:00ID:???
>>148
つうかなんのスクリプトよ。
話はそこからだろ？
0151nobodyさん03/01/16 20:46ID:???
阿呆？
0152nobodyさん03/01/16 21:02ID:???
>>148
つうかなんちゅうスクリプトの描き方だよ。
149氏のように書き換えてみてから実行して美奈代
015314303/01/16 21:23ID:???
>>147
ども、読破しました。
ところで@a->[1];の書き方ってありでしょうか。
素直に$a[1];と書けばいいんでしょうけど…。
0154nobodyさん03/01/16 21:31ID:rmmrK9en
\{@a}->[1]
0155 ◆ZnBI2EKkq. 03/01/16 21:59ID:4OjEZO2W
あるプログラムのHTTPヘッダ出力の部分で
my $expires = shift;
・・・
if($expires > 0) {
グリニッジ標準時の文字列を作って
}
print "Set-Cookie: ・・・
とやっているのですが $expiresには何が入って
どういう意味で使ってるかわかりません。
教えて下さい。よろしくお願いします。
0156nobodyさん03/01/16 22:27ID:t/gkHHSA
>>155
expireの意味知ってますか？
クッキーの有効期限設定してるんだろ
expireなしなら、セッション間のみ有効なクッキー
CGIの話ね
0157nobody03/01/16 22:30ID:6WICp0JY
>>149
ありがとうございました。
それをコピペしたら普通にできました。

原因はじっくり解明したいと思います…。
0158nobodyさん03/01/16 22:45ID:Tl7JXy0h
mod_perl 用にソースを改造してんだけど、
ほとんどのサイトでは

use strict 使う
-w スイッチ使う
グローバル変数をなるべく使わないようにする
/o スイッチ使わない

くらいしか書いてない。
なのに、この通りやってもなんか銚子が悪い。

mod_perl で動かすときって何か他にやらなきゃいけないことってあるん？
例えば eval 使ってはだめとか、
オブジェクトはちゃんとDESTORYしないとだめとか。
0159nobodyさん03/01/16 22:49ID:rmmrK9en
exitを使わない。require ... で読み込んだ物に注意する。
0160nobodyさん03/01/17 00:43ID:???
ファイルをOpenして
その中にある hoge　言う文字がいくつあるかカウントしたいんですが
どうすればいいんでしょう？
open (HOGE,"hoge.txt");
?????
close(HOGE);
0161nobodyさん03/01/17 01:18ID:???
>>160
hogeがどんな風に入っているかで変わってくる。

一つの行にhogeが0か1個しか入っていないことが保証されているならば、

open(HOGE, 'hoge.txt');
@hoge = grep { /hoge/ } <IN>;
close(HOGE);
$count_hoge = scalar @hoge;

全く保証されていないならば、

open(HOGE, 'hoge.txt');
$hoge = join('', <IN>);
close(HOGE);
$count_hoge = $hoge =~ s/hoge//g;

これでいいような気がする。
0162nobodyさん03/01/17 02:19ID:???
$count += map {1} /(hoge)/g while <HOGE>;
0163nobodyさん03/01/17 02:32ID:???
>>160
Cだとものすごく簡単だけど、Perlだとそんなに難しいのか？
0164nobodyさん03/01/17 15:03ID:l3uVFji3
オブジェクト指向Perlを始めたのですが、
メソッド（サブルーチン）の引数が正しくない
（引数の数が正しくないとか、数字であるべきところが文字列だったとか）
の場合、どうすればいいのでしょうか？

エラーを表示？
エラーを返して終了？
単にreturn？
0165nobodyさん03/01/17 15:27ID:???
>>164
エラーコードを返す。
0166nobodyさん03/01/17 15:34ID:???
>>164
他人の書いたコードも見てみるといいよ。
あと、標準の Carp モジュールも調べてみたら。
0167nobodyさん03/01/17 18:46ID:95w9V4FK
煮詰まっています。画像アップ掲示板を
設置しようとしています。
とりあえず入り口は出来たのですが、肝心の出口がどうやら設定がおかしい
ようで"画像をアップできません"とエラーが出ます。
恐らく下記の設定方法を間違えているのでエラーが出るのだと思います。

# アップロードディレクトリ
# → パスの最後は / で終わること
# → フルパスだと / から記述する
$ImgDir = "?????.hp.infoseek.co.jp/clip/img/";

# アップロードディレクトリのＵＲＬパス
# → パスの最後は / で終わること
$ImgUrl = "http://?????.hp.infoseek.co.jp/clip/img/";

色々調べたのですが、ここの部分だけハッキリ答えが出せません。
どうか出口の設定方法を教えてください。
0168nobodyさん03/01/17 19:00ID:zt5lo6Y5
# に書いてあるとおりにやればいいんじゃ？
今どう設定してあってエラーでてるの？
てか何を悩んでるの？
0169nobodyさん03/01/17 19:01ID:???
1：自分はこう言う事がしたい。
2：それでこんな風にやってみたが･･･
3：それだとこんなエラーが出て上手く行かなかった。
て書いてくれ。

下げてみるテスト(鬱
0170nobodyさん03/01/17 19:10ID:mT3lwUSe
MAC OS10.2.3でFTPにアップロードするとファイルが
壊れて0バイトになってしまいます。
使用ソフトはTransmitとNetFinderです。
アップするファイルはCGIのためアスキーモードで転送しています。
でもファイルが壊れてしまいます。
9だとうまくアップできるんですが・・・
どなたか詳しい人教えて下さい
0171nobodyさん03/01/17 19:55ID:???
>>160
my $str;
my $file = 'hoge.txt';
my $hoge_count = 0;

open TXT, $file or die $!;
read TXT, $str, -s $file;
close TXT;

while($str =~ m/hoge/g){
$hoge_count++
}
print $hoge_count, "\n";
0172nobodyさん03/01/17 20:06ID:???
ログを追記式にしていたのですが
ファイルがかなり大きくなってきて
ファイルを全て読み込まず
ファイルの末尾から一行ずつ読み込みたいのですが、
どうしたらいいのでしょうか？
0173nobodyさん03/01/17 20:22ID:???
>>172
無理です。日毎、週毎などでログファイルを切っていきましょう。
0174nobodyさん03/01/17 20:26ID:???
でもtailみたいなプログラムもあるのですから可能なのではないですか？
0175nobodyさん03/01/17 20:27ID:???
>>167
# アップロードディレクトリ
# → パスの最後は / で終わること
# → フルパスだと / から記述する
$ImgDir = "/clip/img/";

# アップロードディレクトリのＵＲＬパス
# → パスの最後は / で終わること
$ImgUrl = "/clip/img/";

で、いんでないの？

>>170
丸痴君ね。
http://pc.2ch.net/test/read.cgi/mac/1042606577/267

>>172
過去ログに似たようなのがあったような記憶が・・・
0176nobodyさん03/01/17 20:30ID:???
>>174
んぢゃ tail を使う。
print `tail -n $num logfilename`;
0177１７３03/01/17 20:31ID:???
>>174
tailを知っていたのなら、ソース読んじゃえばいいのに。
全部読み込んでいるよ。まあ、細かく言えばPerlのようには
読んではいないけど、全てを読み込まないのに最後を知る
方法はないです。
0178nobodyさん03/01/17 20:44ID:GSBryIjf
>>177おまえはあほか。seekすれば、読まなくても飛べる。あと、便利なモジュールがある。File::ReadBackwards
0179１７３03/01/17 20:47ID:???
seekは読み込んでいないとでも？
0180nobodyさん03/01/17 20:56ID:GSBryIjf
場所を指定しただけ。読むっていうのはもちろん中身を読み込むって意味でしょ？


018117503/01/17 21:02ID:???
訂正：
# アップロードディレクトリのＵＲＬパス
# → パスの最後は / で終わること
$ImgUrl = "$ENV{'HTTP_HOST'}/clip/img/";
ｽﾏｿ

ってこれでいいのか？（スクリプトが別鯖にある場合は不可）
018214303/01/17 21:12ID:???
>>154
その文だと{}で無名のハッシュをつくり、
\でリファレンスしませんか？
(\@a)->[1];がまっとう(?)ですので、@a->[1];は使うべきでは無いようですね。
ありがとうございました。
0183nobodyさん03/01/17 23:05ID:???
>>165-166
レスありがとうございます。

にしてもOOP Perlはｻﾊﾟｰﾘ和歌欄買った。
0184１７３03/01/17 23:14ID:???
>>180
指定して飛ぶときに、全然読んでないわけ？ＯＳも
0185nobodyさん03/01/17 23:14ID:xM0Mt5EA
PerlでもRubyでもそうだけど、
class Person {
　int age;
　String name, tel;
　URL homepage;
}
みたいなメンバ変数の型みたいな考え方無しのオブジェクト指向って
のが理解できなくて立ち往生してるのですが、どうやればすんなり
受け入れられますか？
0186nobodyさん03/01/17 23:18ID:???
173ってちょと臭わない？
全角英字DQN?
0187超初心者03/01/17 23:28ID:sm0odS2/
初めてCGIを使おうとしているものですが
配布のものを使おうとしたらうまくいきません。
ランキングのCGIなのですが

# IN投票の際にカウントを認めるREFERER値 (以前のページのURL)
$check_referer1 = 'http://meso.tv/r/rank.cgi';
$check_referer2 = 'http://meso.tv/r/rank.cgi';
$check_referer3 = 'http://meso.tv/r/rank.cgi';

のURLの部分にはどういうURLを入れたらいいのですか？
0188nobodyさん03/01/17 23:37ID:???
>187
そのCGIスクリプトの説明を読むか。
配布されているサイトで聞いてください。
ここはPerlのコーディングの話をするスレッドです。
0189nobodyさん03/01/17 23:43ID:???
>>185
多重ハッシュに慣れろ
0190超初心者03/01/17 23:55ID:???
>>188
説明書にも何も書いていなくサイトの管理人にメールを出したけど
返事がずっとないんで…
0191nobodyさん03/01/17 23:57ID:???
Perlは分かるの？
親切な人が説明してくれても分からなかったらしょうがないでしょ。
019218503/01/18 00:07ID:???
>>189
例えば
$self->{'age'}
って変数があっても、
$self->{'age'}='nobodyさん'　とか $self->{'age'}='http://www.2ch.net'
ってすることができるわけで、
いくつかモジュールを読んでみたけど
たんにメソッドの詰め合わせ的な意味しかないようが気がするんです。
0193nobodyさん03/01/18 00:20ID:O9FxKTGG
来客者は書き込めるが、他の来客者が書いたものは見られないようなcgiってありますか？
0194nobodyさん03/01/18 00:22ID:???
>193
探すだけならスレ違い。
ここはコーディングの相談所。
>1読め。
0195 ◆PxAOHU.zVE 03/01/18 01:56ID:55Z6A3Vx
>>185
5.8のAttributeってまだ使えないのかな...
このへん？
http://search.cpan.org/author/ABERGMAN/Attribute-Handlers-0.78/lib/Attribute/Handlers.pm
0196nobodyさん03/01/18 08:30ID:eKp44Q6B
>>185
Perl6 で型が出来るだろ。
それでいいじゃないか。
0197びびった03/01/18 09:14ID:x+/Sd8AA
俺の彼女がこんなとこに・・・
http://click.dtiserv2.com/Click/1-45-2963
0198nobodyさん03/01/18 14:51ID:???
perlプレビュー機能のあるエディタってありますか？
perl Builderぐらいしかないのでしょうか？
0199HOGE03/01/18 15:51ID:5ALQn0gp
以下のようなことをやりたいのですが、うまくいきません。
とても困っています。どうすれば良いか教えてください。
#!usr/local/perl
#in hoge.cgi
my $hoge = 'hoge';
require './hoge.tmpl';

#in hoge.tmpl
print <<HOEG
Content-type: text/html

<h1>$hoge</h1>;
HOGE
1;
0200nobodyさん03/01/18 15:56ID:???
1：自分はこう言う事がしたい。
2：それでこんな風にやってみたが･･･
3：それだとこんなエラーが出て上手く行かなかった。

1と3が無いと誰も答えられないよ。
良い回答は良い質問から。一緒に勉強しましょう。
0201HOGE03/01/18 16:05ID:5ALQn0gp
1：冗長なフォーマット部分を別のファイルにしようと思いマスタ。
2：Webで調べていると、require文を使えば、
「その場所にかかれているかのように
スクリプトを取り込むことができる」と知りました。
3：でも、$hogeの部分は空のままです。
require文の解釈が間違っていることは自覚しています。
名前空間のせいで、変数が受け渡されていないのかもしれません。
しかし、今の私には具体的にどうすればいいかがわかりません。
質問に2レスもつかってすみません。どうか教えてください。
0202vvv03/01/18 16:09ID:+GEyyv8c
http://www6.ocn.ne.jp/~endou/index2.html
　　　　　★YAHOOOプロフィール★
0203nobodyさん03/01/18 16:28ID:???
>>201
our $hoge = 'hoge';

print <<HOGE;
0204nobodyさん03/01/18 17:08ID:lJXENDzT
質問です。
和鳥の無料WebｽﾍﾟｰｽにCGIのｶｳﾝﾀを置こうと思い、探して来ました。
見つけてきたそのCGIは、説明書きによるとcgi-bin以下に画像ﾌｧｲﾙを置いて、
それを引っ張り出してくるものらしい。
けど、和鳥には、「セキュリティ上の都合から、cgi-bin以下に画像ファイルを置いても
表示されないので、別の場所に置いてくれ。」との旨が書いてあり、そのままではうまくいかなかった。
そこで、画像ディレクトリを別の場所へ移したわけなのですが、、、えーと、そしたら
「$imgdir = './Gif/';」の部分は、このままではダメなのでしょうか？
試しにそのままやってみたらエラーになったので、省略せずにURLそのまま入れてみたりしたのですが、
やはりだめでした。
画像自体はちゃんとうｐされていたので、私的にはその部分になにか間違いがあるのかなと
思ったのですが。。
どしたら良いでしょうか。すいません、どなたか教えて下さいです。
0205nobodyさん03/01/18 17:11ID:???
>204
１：パスが間違っている（ＨＴＭＬの勉強しろ）
２：パーミッションが間違っている（パーミッションの勉強しろ）
３：そもそもperlの話じゃないからココではスレ違い（常識を勉強しろ）
４：配布元か、和鳥スレで聞け
0206nobodyさん03/01/18 17:15ID:???
>>199
#!usr/local/perl も不安といえば不安だな

>>204
URLで入れたら動きそうな気がするが、大文字小文字は間違ってない？
ここで言ってるURLは http:// から始まるやつね
020720403/01/18 17:25ID:lJXENDzT
>>205
ｽｲﾏｾﾝ ｽｲﾏｾﾝ ｽｲﾏｾﾝ

>>206
ありがとです。
んー、でも大文字小文字はあってるような。。
020820403/01/18 17:26ID:???
下げ忘れてしもた。。ごめんサイ。。
0209 ◆PxAOHU.zVE 03/01/18 19:16ID:???
>>164
エラーフラグ立てた上で、オブジェクトを返しておいて
is_error,error_message等のメソッドを用意するってのは？
0210nobodyさん03/01/18 22:39ID:???
>>206-207
CGIが画像ファイルを直接読むんだろ。URLじゃ駄目に決まってるじゃねーか。
0211nobodyさん03/01/18 22:42ID:???
>>210
最低でもSocketか。
0212nobodyさん03/01/19 00:27ID:???
>>208
質問はageで
■ このスレッドは過去ログ倉庫に格納されています