arcsin の回答履歴

全60件中1~20件表示
  • アップロードの際にファイルパス

    いつもお世話になります。 ファイルアップロードするとき対象ファイルの 取得先(ローカルでのパス)も一緒に表示したいです。 例:abc.txtがc:\a\ab\abcの配下に あるとした場合abc.txtをアップロードしたら アップロード完了後名前、サイズ、タイプ、 ローカルでのパスc:\a\ab\abcを表示させたいです。 名前、サイズ、タイプは取得できますが なかなか元ファイルのパス(c:\a\ab\abc)が取得できません!もしかしてPHPでは取得できないでしょうか? そうであればほかの方法がございましたら ご教授いただけないですか?

    • ベストアンサー
    • PHP
  • アップロードの際にファイルパス

    いつもお世話になります。 ファイルアップロードするとき対象ファイルの 取得先(ローカルでのパス)も一緒に表示したいです。 例:abc.txtがc:\a\ab\abcの配下に あるとした場合abc.txtをアップロードしたら アップロード完了後名前、サイズ、タイプ、 ローカルでのパスc:\a\ab\abcを表示させたいです。 名前、サイズ、タイプは取得できますが なかなか元ファイルのパス(c:\a\ab\abc)が取得できません!もしかしてPHPでは取得できないでしょうか? そうであればほかの方法がございましたら ご教授いただけないですか?

    • ベストアンサー
    • PHP
  • forkしてもバックグラウンドで動かない

    お世話になっております。 あるサイトで見たforkの例を元に下記のようなソースでバックグラウンドで処理 しようとしているんですが、処理が終わるまでブラウザがロックされて しまします。 $| = 1; rm("-f","$TmpPath$KYOTEN/result/*.*"); &Upload_Check; print "Content-type: text/html\n\n"; &DataProgHeader_Write; #画面の切替 &DataProgDetail_Write; FORK: { if( $pid = fork ) { close(STDOUT); wait; } elsif (defined $pid) { close(STDOUT); chdir "/u1/uca/htdocs/PPro"; system("perl U0302.pl $Dkyoten"); exit; } elsif ( $! =~ /No more process/) { sleep 5; redo FORK; } else { &MsgDisp("Forkできませんでした。"); } } # End Of Label:FORK バックグラウンドで動かない理由が分からないのです。 どなたかお助けください。 また、ソース中で system("perl U0302.pl $Dkyoten"); とありますが、サーバで直に動かすと正常に動作するのですが cgiから呼び出すと文字コードエラーで落ちてしまします。 (呼び出すCGIはEUCで書いていますが、U0302.PLは処理の都合上 SJISで書いています。) こちらも原因の想定がつきません。 どなたか参考サイトでも構いませんので、お教えください。 お願いいたします。

    • ベストアンサー
    • Perl
    • papope
    • 回答数2
  • ファイルアップロードについて

    環境: OS/Vine Linux 3.2 Apache 2.0.55 mod_ssl 2.0.55 OpenSSL 0.9.7d PHP 5.1.2 上記の環境で簡単なファイルアップ処理をPHPで 試みようと思っていますが、できなく困っています。 HTMLからフォームを使って ファイルを選択した後に、「Send File」ボタンを 押してもまずファイルサイズが取得できません。 print_r($_FILES)を確認すると、 「Array ( [userfile] => Array ( [name] => test.jpg [type] => [tmp_name] => [error] => 2 [size] => 0 ) ) 」とクライアントマシンの元ファイル名とエラーコードのみ表示されます。 ちなみにupload_max_filesizeは2Mで設定しています。 なので、MAX_FILE_SIZEは2Mになりますよね?? どなたかご教授下さい。よろしくお願いいたします。 ソース: 【html】 <form enctype="multipart/form-data" action="b.php" method="POST"> <input type="hidden" name="MAX_FILE_SIZE" value="30000"> Send this file: <input name="userfile" type="file"> <input type="submit" value="Send File"> </form> 【php】 <?php print_r($_FILES); //続く....... ?>

    • ベストアンサー
    • PHP
  • 日付をすべて2桁(07/02、 06/30)にしたい

    a.html内にある日付のデーターを取ってきて日付をすべて2桁(もし 7/2 ならば 07/02 、6/30 ならば 06/30)にしたいのですが、なかなかうまくいきません。 自分で作ったプログラムa.phpでは最初の日付しか2桁になりませんでした。 -------------a.html--------------- <>06/25、7/2<>13:00~13:55<>あああああ<> <>06/25、8/2<>19:00~20:00<>いいいいい<> <>6/27<>19:00~21:48<>ううううううう<> <>06/27、7/3、7/4、7/12<>19:58~20:54<>ええええええええ<> <>7/1<>13:54~17:00<>おおおおおおお<> --------------a.php---------------- <? $filename = "a.html"; $filedata = @file($filename); $filedata = @join("",$filedata); preg_match_all('/(<>(.*?)<>.*<>.*<>)/',$filedata, $match); for($i=0;$i<count($match[0]);$i++){ $match[2][$i] = explode("、", $match[2][$i]); //////////この辺がうまくできない/////// for($m=0;$m<count($match[2][$i]);$m++){ $match[2][$i][$m] = explode("/", $match[2][$i][$m]); $match[2][$i][$m][0] = sprintf("%02d", $match[2][$i][$m][0]); $match[2][$i][$m][1] = sprintf("%02d", $match[2][$i][$m][1]); $match[2][$i][$m] = $match[2][$i][$m][0]."/".$match[2][$i][$m][1]; $match[2][$i] = join("、",$match[2][$i]); } print $match[2][$i]."<br>";//←最後はこの形で表示できるようにしてもらいたいです// } ?> どなたか教えてください。m(_ _)m よろしくお願いします。

    • ベストアンサー
    • PHP
  • 日付をすべて2桁(07/02、 06/30)にしたい

    a.html内にある日付のデーターを取ってきて日付をすべて2桁(もし 7/2 ならば 07/02 、6/30 ならば 06/30)にしたいのですが、なかなかうまくいきません。 自分で作ったプログラムa.phpでは最初の日付しか2桁になりませんでした。 -------------a.html--------------- <>06/25、7/2<>13:00~13:55<>あああああ<> <>06/25、8/2<>19:00~20:00<>いいいいい<> <>6/27<>19:00~21:48<>ううううううう<> <>06/27、7/3、7/4、7/12<>19:58~20:54<>ええええええええ<> <>7/1<>13:54~17:00<>おおおおおおお<> --------------a.php---------------- <? $filename = "a.html"; $filedata = @file($filename); $filedata = @join("",$filedata); preg_match_all('/(<>(.*?)<>.*<>.*<>)/',$filedata, $match); for($i=0;$i<count($match[0]);$i++){ $match[2][$i] = explode("、", $match[2][$i]); //////////この辺がうまくできない/////// for($m=0;$m<count($match[2][$i]);$m++){ $match[2][$i][$m] = explode("/", $match[2][$i][$m]); $match[2][$i][$m][0] = sprintf("%02d", $match[2][$i][$m][0]); $match[2][$i][$m][1] = sprintf("%02d", $match[2][$i][$m][1]); $match[2][$i][$m] = $match[2][$i][$m][0]."/".$match[2][$i][$m][1]; $match[2][$i] = join("、",$match[2][$i]); } print $match[2][$i]."<br>";//←最後はこの形で表示できるようにしてもらいたいです// } ?> どなたか教えてください。m(_ _)m よろしくお願いします。

    • ベストアンサー
    • PHP
  • メール送信プログラムについて

    お世話になっております。 現在、メール送信プログラムを作成しております。 下記のプログラム内に、「BCC」の部分を追加したいと思いますが、 perseエラーが発生してどうにもうまくいきません。 どなたか、ご教授のほどよろしくお願いします。 $title2 = "=?iso-2022-jp?B?".base64_encode($title)."?="; $naiyou2 = "お名前:$name\n メールアドレスfrom:$from\n メールアドレスto:$to\n タイトル:$title\n 内容:$naiyou\n"; if ($name != "" and $from != "" and $title != "" and $naiyou != "" ) { if (mail($to, $title2, $naiyou2, "From:$from")) { echo "メールを送信しました"; } else { echo "メール送信失敗です"; } 下記の場合なら、問題なくBCCメールが送信されるのですが。。 <?php $headers = "Bcc: aiai@ueo.jp\r\n"; mail("okaoka@ueo.jp", "My Subject", "Line 1\nLine 2\nLine 3", "$headers"); ?>

    • ベストアンサー
    • PHP
    • it2007
    • 回答数3
  • メール送信プログラムについて

    お世話になっております。 現在、メール送信プログラムを作成しております。 下記のプログラム内に、「BCC」の部分を追加したいと思いますが、 perseエラーが発生してどうにもうまくいきません。 どなたか、ご教授のほどよろしくお願いします。 $title2 = "=?iso-2022-jp?B?".base64_encode($title)."?="; $naiyou2 = "お名前:$name\n メールアドレスfrom:$from\n メールアドレスto:$to\n タイトル:$title\n 内容:$naiyou\n"; if ($name != "" and $from != "" and $title != "" and $naiyou != "" ) { if (mail($to, $title2, $naiyou2, "From:$from")) { echo "メールを送信しました"; } else { echo "メール送信失敗です"; } 下記の場合なら、問題なくBCCメールが送信されるのですが。。 <?php $headers = "Bcc: aiai@ueo.jp\r\n"; mail("okaoka@ueo.jp", "My Subject", "Line 1\nLine 2\nLine 3", "$headers"); ?>

    • ベストアンサー
    • PHP
    • it2007
    • 回答数3
  • tarファイル作成について

    アップロード機能を作る途中でアップロードするファイル(フォルダ)に対して新規tarファイルに変更し、 それをアップロードする方法をとることになりましたが PHPは初心者のもので、サンプル見てアップロード機能は なんとか作りましたが、アップロードするまえにtarファイルに変更することはどうしてもわからなくて みなさんの貴重な知恵をおかりしたいと思っています。 よろしくお願いします。

    • ベストアンサー
    • PHP
  • 変数を入れないと永遠とfgetsが続く。

    受け付けた変数の値からテキストを読み込むようなページを作っています。 http://sample.jp/index.php?id=20060620001 この要領ですが、これでは他人にid=の値に存在しない値を入力されると永遠にエラーが続いてしまいます。 私のPHPの文法が足りていないと思うのですが期待しない変数の値の場合エラーメッセージ等での対応は出来ないでしょうか? 永遠とその値を信じて頑張っているサーバーがかわいそうです。 回避策を教えてください!!

    • ベストアンサー
    • PHP
    • noname#20805
    • 回答数2
  • visual studio 2005でcoutがつかえません

    cout << "help\n"; をプログラムに書いても、coutを識別してくれません どうしたらよいでしょうか?

  • php4.0.6に対応するphp_mbstring.dll

    Apache1.3.35+PHP4.0.6でPHPのローカルテストをする環境を作ろうとしています。 ただ、PHP4.0.6にはマルチバイト文字関数を扱うphp_mbstring.dllが実装されていなく、マルチバイト文字関数を使えません。 後付で同dllを関連付けたいと思っているのですが、どうも他バージョンのdllは使えないらしいのです。 PHP4.0.6に対応するphp_mbstring.dllがどこにあるかご存知の方はいらっしゃいますでしょうか? また、関連付ける方法などご存知の方がいらっしゃいましたら、あわせて教えていただきますようよろしくお願いいたします。

    • ベストアンサー
    • PHP
  • perl-cgi「日時によるファイル操作」について

    perl-cgi「日時によるファイル操作」について perl-cgiで、あるディレクトリ中のファイル更新日が最も若い2ファイルを表示して、それ以外を削除したいのですがどのようにすればよいでしょうか? #調べたいディレクトリを読み込む。 $Dir = "./cache"; opendir DIR,"$Dir"; my @alldir = readdir DIR; close DIR; #ファイル(パス)名と作成日時を求める。 #最新2つのファイルパス(名)を表示する。 print "NewFile".ファイルパス1; print "<HR>"; print "OldFile".ファイルパス2; #最新2つ以外は全て削除 unlink($_); exit(0);

    • ベストアンサー
    • Perl
  • PHPの乱数を発生させる

    ときに <?php echo mt_rand(0,9); ?> では毎回同じ値が出て駄目だとなっていましたが 最近ではわざわざ <?php mt_srand(); echo mt_rand(0,9); ?> とか <?php mt_srand(time()); echo mt_rand(0,9); ?> とかのように mt_srand(); や mt_srand(time()); などを追加しなくてもよくなったのでしょうか? これらをしなくても更新の度に値は変っています

    • ベストアンサー
    • PHP
    • guuman
    • 回答数2
  • PHPの乱数を発生させる

    ときに <?php echo mt_rand(0,9); ?> では毎回同じ値が出て駄目だとなっていましたが 最近ではわざわざ <?php mt_srand(); echo mt_rand(0,9); ?> とか <?php mt_srand(time()); echo mt_rand(0,9); ?> とかのように mt_srand(); や mt_srand(time()); などを追加しなくてもよくなったのでしょうか? これらをしなくても更新の度に値は変っています

    • ベストアンサー
    • PHP
    • guuman
    • 回答数2
  • 文字列の抽出

    指定したファイルの中から'<'と'>'とで囲まれた部分文字列を抽出したいのですが方法がわかりません。どのようにしたらできるでしょうか? *ファイルは制御コードが混じっているのでバイナリとして扱わないといけないかもしれません。 よろしくお願い致します。 ------------------------------------------------- open(IN, "test.dat"); open(OUT, "> out.txt"); binmode(IN); while (<IN>) { /^<(\w+)>$/; print OUT "$1\n"; } close(IN); close(OUT);

    • ベストアンサー
    • Perl
    • noname#27709
    • 回答数4
  • perl で mailto: リンク

    perl で書かれた CGI のソースに、$vout 変数内に a タグで mailto: のリンクが書いてあり、クライアントが リンクを踏むと、メーラーが立ち上がるようになっています。 が、mailto: に subject と body を含めて、かつ body には改行を含めたいのですが、どうしてもエラーになってしまいます。 以下を含める場合、どのように書けばよいのでしょうか ? <持込に関して> ← subject ↓本文 @お名前[改行] @ご住所[改行] @お電話番号[改行] <問い合わせ内容詳細> ちなみに URLエンコードで <a href="mailto:yourname@yourhost.yourdomain?subject=%8E%9D%8D%9E%82%C9%8A%D6%82%B5%82%C4&body=%40%82%A8%96%BC%91O%5B%89%FC%8Ds%5D%0D%0A%40%82%B2%8FZ%8F%8A%5B%89%FC%8Ds%5D%0D%0A%40%82%A8%93d%98b%94%D4%8D%86%5B%89%FC%8Ds%5D%0D%0A%3C%96%E2%82%A2%8D%87%82%ED%82%B9%93%E0%97e%8F%DA%8D%D7%3E"></a> としてもサーバエラーになってしまいます。 subjectやbody をつけなければ動くのですが、どこがいけないんでしょうか ? ソースは ShiftJISになっています。よろしくお願いします。

    • ベストアンサー
    • Perl
  • 文字列の抽出

    指定したファイルの中から'<'と'>'とで囲まれた部分文字列を抽出したいのですが方法がわかりません。どのようにしたらできるでしょうか? *ファイルは制御コードが混じっているのでバイナリとして扱わないといけないかもしれません。 よろしくお願い致します。 ------------------------------------------------- open(IN, "test.dat"); open(OUT, "> out.txt"); binmode(IN); while (<IN>) { /^<(\w+)>$/; print OUT "$1\n"; } close(IN); close(OUT);

    • ベストアンサー
    • Perl
    • noname#27709
    • 回答数4
  • 「&$」ってどういう意味?

    今読んでいる、あるスクリプトに以下のようにあります。 -------------------------------- ・・・・(省略)・・・・・・・ exit unless(exists $WORK{$Work}); &$Work; ---------------------------------- 最後の「&$」ってどういう意味なんでしょうか?

    • ベストアンサー
    • Perl
    • benneb
    • 回答数1
  • ファイルの最後の行から表示させる(最新情報を5回分だけ表示)

    ファイルの最後に1行追加し、6行以上になるとファイルの先頭を1行削除。 表示は最後の行から行うスクリプトを作りたいのです。 新しい情報を5回分だけ表示する様にしたかったのですが、余りにも力技なのでもう少しスマートにやる方法を教えてもらえませんか? ----sort.txt---- 1a 2b 3c 4d ---------------- #!/usr/bin/perl $fname = "sort.txt"; print "Content-type: text/html;\n\n"; $aaa="5e"; open(OUT, ">>$fname"); flock(OUT, LOCK_EX); print OUT "$aaa\n"; flock(OUT, LOCK_NB); close(OUT); open(IN, "$fname"); $cnt = "0"; while($line = <IN>){ $a[$cnt] = "$line"; $cnt++; } close(IN); if($cnt > 5){ open(OUT, ">$fname"); flock(OUT, LOCK_EX); $cnt = "0"; while($cnt < 6){ if($cnt > 0){ print OUT "$a[$cnt]"; } $cnt++; } flock(OUT, LOCK_NB); close(OUT); } $cnt = "0"; open(OUT, "$fname"); @buff = <OUT>; close(OUT); foreach $line ( reverse @buff ){ $cnt++; print "$line<br>\n"; } exit();

    • ベストアンサー
    • Perl