スクリプト改造工房 Part4
■ このスレッドは過去ログ倉庫に格納されています
0001名無しさん@お腹いっぱい。
02/02/05 01:20ID:CZVDHHphという人がいましたらここで聞いてください。
ひょっとしたらアドバイス出来るかもしれません。
前スレ
Part2 http://pc.2ch.net/test/read.cgi/perl/986986227
Part3 http://pc.2ch.net/test/read.cgi/php/988808396
なお、質問するときは
1)そのスクリプトのある場所(URL必須、拡張子".txt"でアップすればなお良し)
2)どんな風に改造して欲しいのか? (完成イメージHTMLを用意すればなお良し)
を必ず明記しよう。
0002名無しさん@お腹いっぱい。
02/02/05 01:37ID:DnrYj3PG日付を1日もしくは半日ずらして表記させるにはどうすればいいでしょうか?
例えば、2/5の深夜(午前)に書き込んで、表示画面で2/4と表示させたいのです。
http://members.tripod.co.jp/gumboll/u_diary.txt
にアップしてみました。時間表記をさせるらしきところに★をつけておきました。
よろしくお願いします。
0005ナナシンボ
02/02/06 17:04ID:dTW/dCg2なんとか新着情報をトップページに表示する方法はわかったのですが、
open (IN,"./log/new_ys.cgi") || &error('オープンエラー','指定された書込みファイルが開けません。');
@LINES = <IN>;
close (IN);
このままだと必要以上に新着サイトが表示されてしまいます。
なんとかして表示できる件数と紹介文の文字数を指定できないでしょうか?
もしも可能な方がおられましたらご教授ください。
0006ナナシンボ
02/02/06 17:21ID:dTW/dCg2# 新着サイトのデータを読み込む
open (IN,"./log/new_ys.cgi") || &error('オープンエラー','指定された書込みファイルが開けません。');
@LINES = <IN>;
close (IN);
# 表示したい場所に配列する。
foreach ( @LINES ) {
($Dno,$Dtitle,$Durl,$Dmark,$Dsyoukai,$Dkanricom,$Dkt,$Dtime,$Dbana_url,$Dpt,$Dip,$Dkey,$Ddate,$Dname)=split(/<>/,$_);
で
$Dkt=$_;
$Dkt=$dkt{$_};
if(length($dkt{$_}) > $CUT eq "s"){
$cu=$CUT-3; $dkt{$_}=substr($dkt{$_},0,$cu); $dkt{$_}.="...";
}
こんな感じのを加えて必要以上の文字列の場合は最後を...にしたいのです。
0007ナナシンボ
02/02/06 17:31ID:dTW/dCg2以外に簡単でした。
もう少し頑張ってみます。
0008ナナシンボ
02/02/06 17:38ID:dTW/dCg2又,宜しくお願いします<(_ _)>
0009名無しさん@お腹いっぱい。
02/02/06 18:44ID:???お疲れヽ(´ー`)ノ
■ このスレッドは過去ログ倉庫に格納されています