Perl
- 複数ファイル？処理させる方法について
Perlでファイルに適当なレコードを追加するスクリプトを組んだのですが、 どうしたら、複数ファイルを一度に処理できるのでしょうか？ 例えば、フォルダ内のファイル全てを処理するとか、、、 環境はwin ntです。
- smtpでのメール送信？
最近レンタルするようになったサーバーがsendmailがつかえないと知りました。 ｓｍｔｐでもメール送信のスクリプトを組める様ですが、簡単なサンプルをご存知の方教えていただけないでしょうか？ よろしくお願いいたします。
- perl 出力について
Win98SEのDOS窓で、たとえば perl -w a.cgi というふうにするとエラーなどがDOS窓に出力されると思いますが、それがたくさんあるとスクロールして上のほうが見れないんですがどうすれば見れるのでしょうか？ >a.txt などと付け加えると処理結果(？)はファイルに出力されるのですが、エラーのメッセージなどはファイルに出力されません、DOS窓に表示されたままです。 よろしくお願いします。
- 全角スペースを切り落とす方法
掲示板などで、投稿された名前などに入っている全角スペースを切り落としたいのです。 $name =~ s/\s+//g; これでやってみたのですが、半角スペースしか切り落とせません。 全角スペースを切り落とすにはどのような方法がありますでしょうか？ 自分なりに調べてみたんですが、わかりませんでした。 お時間ございましたら、教えていただけますでしょうか？ 方法を紹介してあるURLだけでも結構ですので、よろしくお願い致します。
- もっとも初歩的なデータの渡し方を
もっとも初歩的なデータの渡し方を教えていただけませんか。 <FORM ACTION="next.cgi" METHOD="POST"> <INPUT TYPE="TEXT" NAME="内容" SIZE="12"> <INPUT TYPE="SUBMIT" NAME="Submit" VALUE="送信"></form> next.cgiでどう書けば「内容」が表示されますか？ まったく初心者の質問ですみません。
- 画面上再読み込みをさせたいのですが・・・
プルダウンメニューでセレクトしたら， その画面がかわったということを知らせて次の動作にうつらせたいので、 ｒｅｌｏａｄさせたいのです。 こういうことは可能でしょうか？ ｏｎＣｈａｎｇｅを利用したらどうかとは思っているのですが・・・ print "[select name=P5 <\"javascript=onChange:location.reload()\">]" という記述でいいのでしょうか？ よろしくお願いします。
- Ｐｅｒｌ内でＪａｖａＳｃｒｉｐｔを利用したいのですが、その設置方法を教えてください。
onChangeで関数内の処理（メニュー項目を変更する関数です）を実行したいと考えています。 ＪａｖａＳｃｒｉｐｔの関数定義を記述する事が出来るのでしょうか。 また、出来る場合はその記述方法を教えてください。 ＨＴＭＬでＪａｖａＳｃｒｉｐｔを利用するときと同様に、<HEAD></HEAD>に print<<EOM; <SCRIPT language="JavaScript"> <!-- 関数 // --> </SCRIPT> EOM 関数を記述し、動いてほしいところに <SELECT NAME="「フォーム名」" onChange="「関数（）」">と メソッドを記述したらいいのでしょうか。 が、いまカスタマイズかけているものは、ＨＴＭＬのヘッダーが一括表示となっています。こういう場合でも、同じように＜ＨＥＡＤ＞内に記述していいのですか？ よろしくお願いします。
- UserGetAttributesの第7引数が文字化けするのですが
Win32::NetAdminモジュールの中の UserGetAttributes関数に関する質問です。 WindowsNT 4.0, ActivePerl 623, Win32::NetAdmin (version = 0.07) を使っています NTサーバ上のユーザの属性を取りだすスクリプトの中で UserGetAttributes 関数を使ったところ，この関数の第7引数に格納される "説明"という項目に全角文字がふくまれている場合には，文字化けして(2バイトの文字が3バイトになって)とりだされてしまいます。半角文字はそのままとりだすようです。 私の環境が悪いのか，それともこういった仕様なのかが判断できずにいます。 同じ経験をされた方はいらっしゃらないでしょうか。 仮に仕様によるものだとすると，文字化けした戻り値をsjis等に変換するモジュールも存在しそうなものですが，実際どこかにあるのでしょうか。
- perlでの改行コードの置換
perlで改行コードを置換したいのですが・・・ もとのファイルはS-JISコードでその中身をEUC（UNIXで使用するために）に変換します。ここまではOKなのですが、改行コードがうまく行きません。 改行コードをUNIXで使うためにLFだけにしようと思い、 $line =~ s/\r\n/\n/g; (これは\r\nで引っかからない) とか $line =~ s/\n/\x0A/g; とかにしてみたのですがうまく行きません。 どのようにすればよろしいでしょうか？
- i-mode＆J-phoneからのみのアクセス限定
はじめまして。初めて質問させて頂きます。 Perlで作成されたCGIスクリプト内で、i-modeとJ-phone端末からでしかアクセスできないようにする事ってどのようにスクリプトを組めばよいのでしょうか。 ＰＣからアクセスすると、携帯からのアクセスして下さいといったエラー画面が出るようにしたいのですが。 よろしくお願い致します。
- 自分のサイト内のみを検索するPerlscriptは？
色々さがしたんですが、登録してURLのリンクなどを検索するものは沢山あります。 ですが自分のサイト内を検索するものってあるんでしょうか？ 「全文検索」というんでしょうか？ 色んな記録や数値なんかを探したいのです。 出来れば表組みしてくれると涙ものですが・・・ やはりperlが数から言って一番多いと思いここの質問投稿しました。 私の検索の仕方が悪い、というのは洒落にならないかな？・・・
- ベストアンサー
- pokiseijin
- Perl
- 回答数2
- ｌｏｇファイルをひらいての処理の仕方を教えてください。
データベース検索のｐｅｒｌをカスタマイズ中です。 ユーザが入力したものを、検索条件のひとつにしたいのですが、表示されません。 インプットしたものはｌｏｇファイルに書き込まれるので、それを開いて反映させればいいのだろうということまでは、なんとかわかるのですが、どのように表記していいのか・・・今はない知恵を絞ってこのように表記しているのですが。 if (!open(FD,"$logfile")) { &error(0); } @lines = <FD>; $cnt = @lines; close(FD); print "<select name=P2 >\n"; print "<option value=\"0\" selected>指定なし\n"; $i =0; foreach $line (@lines) { ($no,$sub,$com1,$com2,$com3,$p1,$p2,$p3,$p4) = split(/\,/,$line); chop; if ($p2 ne '') { $i++; $p2s{($p2)[0]}++; $n++; } } foreach (keys %p2s) { print "<option value=\"$_\">$_\n"; } print "</select></td>\n";
- ユーザ入力が表示されない原因を教えてください。
ＣＧＩ初心者です。基礎を勉強しただけなのでまだまだ理解が足りないせいかもしれません。現在データ検索のカスタマイズをしています。 ユーザが入力したものを検索条件の一部にと考えているのですが、なかなかできません。どこがいけないのかおしえていただけないでしょうか？ インプット print "<P>● 業 務 <input type=text name=P2 size=30>\n"; アウトプット print "<td valign=top nowrap><font color=\"$t_color\">■</font> <B>業 務</B><br>\n"; print "<select name=P2 >\n"; print "<option value=\"99\" selected>指定なし\n"; $i =99; foreach $line (@lines) { ($name,$value) = split(/\,/,$line); chop; if ($name ne '') { $i++; $names{($name)[0]}++; $n++; } } foreach (keys %names) { print "<option value=\"$_\">[$_]\n"; } print "</select></td>\n"; と表記してます。クッキーを利用して反映できるようにはしていて、 入力したものを、登録内容の確認や、削除するときやメンテするときにはちゃんと表示されています。
- ***.cgiの中身は第三者から見られることはあるのでしょうか？
例えば、htaccessの中に AddType application/x-httpd-cgi .cgi .dat .txt という一文を追加し、datやtxtの拡張子でデータを記録します。 その中身は第三者からのぞくことは出来るのでしょうか？ 通常ブラウザではＣＧＩとして動こうとしますのでエラーが出るはずですが 見られるとすればどういう場合があるでしょうか？ よろしくお願いいたします。
- ユーザー認証について
i-mode用のページではユーザー認証にあたって、htaccessでhtpasswdの設定を行うとユーザー認証を行うことができますが、j-sky,ezwebでは出来ないみたいです。 それで、perl scriptでそれらを認証させることが出来るのでしょうか？ ご存知の方よろしくお願いいたします。