diszo の回答履歴

　宜しくお願いします。 私がよく行くスーパーは閉店時間が２３時ですが、 ５分くらい前になると照明が次々と消されていきます。 もちろん買い物が出来なくなるレベルまでは暗くはしませ んが、場所よってはかなり暗くされてしまいます。 　野菜売り場などはビニールカバーも降ろされて、野菜を 手に取れない状態にされてしまいます。 　買い物途中だと何だか「早く帰ってください」とでも言われて いるようで、私個人の受け止め方は「非常に不愉快」という 感じです。 　皆さんに聞きたいのですが、皆さんが行くスーパーでは閉店時間 が近づいてきたら、照明を暗くするような事をしますでしょうか。 また、実際に私が良く行くスーパーのような事をされたら、 気分的にどうでしょうか？ 　正直な気持ちを教えて下さい。 以前ほっかほっか弁当を買った時、閉店時間ギリギリだった せいか店を出た途端、表の照明を消されてしまいました。 「早く帰って欲しかったんだろうな～」と気分最悪になった事も ありました。基本的に自分はこういうの苦手なんですね・・・

来年結婚予定です。会社関係は呼ばず、親族と友人のみで結婚式をします。大学時代にお世話になった先生で今は年賀状でのやりとりだけですが、私の結婚を心配されており『結婚式に呼ばれるのを楽しみにしています』『久々に会ってゆっくり話したいです』等のコメントが毎年かいてあります。私も結婚式にはぜひきてほしいのですが、女友達の席の中に一人だけ恩師（男性60歳くらい）に入ってもらうのは違和感があるのかなと…心配しています。（友だちの中には恩師と面識がある人もいます）お互い気を使わせるようなら呼ばない方が良いのか…またもし呼ぶなら乾杯や挨拶をしてもらわないといけないのか、恩師は手品が得意なので余興をお願いしたら失礼か…等色々考えて結論がでません。彼は呼びたい人は呼んだらいいよ～！と言っていますが。どうかアドバイスをお願いします。

例えばある配列内に @moji = (ak, df, gc); などという値でも文字でもが格納されていたとして、 $x = "ak"; といったある変数に格納されている値・文字（この場合はak）と一致する要素が配列@mojiに格納されていた場合に、その格納されている要素の添え字番号（配列の添え字番号）を返すような関数はないでしょうか？ イメージとして $res = mch($x); とすると、0が返されて$resに格納されるというものです。 ちなみにRという言語では > a <- c("ljj", "B0", "op199") # 変数aに3つの文字列要素を代入する > res <- which(a == "op199") # which()は引数に指定された論理に一致する要素番号を返す > res # aについて，a == "op199"がTRUEとなるのは要素番号3であるから，3を返す [1] 3 というものがあるのですが、これと同じような関数が欲しいのです（泣）

自分のHPにkent webさんのweb mart ver1.7を使用しています。 拡張子がhtmとhtmlのページ（買い物カゴ画面以外）にはファビコンを設定していますが、cgiのページにファビコンを表示させるにはどうすればいいのでしょうか？ cgiファイルに直接ファビコン設定を記述するのでしょうか？ よろしくお願いいたします。

perlのスクリプトをダブルクリックするとコマンドプロンプトがでてきて、どんなスクリプトでもそのスクリプトの結果表示の直前に自動的にwindowが閉じてしまいます。 いつもはコマンドプロンプトを開いてドラッグして起動しているのですが、直接スクリプトを開く方法はないのでしょうか？？ 回答よろしくお願いします。

C# OpenFileDialogで指定した拡張子以外のファイルが選ばれた際のエラー処理 いつもお世話になっております。 唐突な質問で申し訳ございません。 現在、C#でOpenFileDialogによってcsv形式のファイルを選択し、ダイアログを閉じた後、 テキストボックスにファイルのパス(名前)の表示をしようとしています。 その際、もしcsv形式のファイルが選ばれなかったときに 「csv形式のファイルを選択してください」などのエラーを表示させようと思っています。 ファイルのパスを表示させるまではできましたが、エラーを表示させる判断の処理をどうしてよいのかわかりません。 どなたかご教授おねがいします。 あと当方、初心者ですので、コードなど載せてくださるとありがたいです。 以上、よろしくお願いします。

Objective-CのNSTaskからAutomatorで作成したアプリを複数回実行するとフリーズするのですが、原因が分からないのでアドバイスをいただきたく書き込みさせていただきます。 Automatorの処理は、「イメージファイルにサムネールアイコンを追加」するだけの処理です。1度の実行で複数枚の画像を1枚ずつAutomatorに渡して処理を行います。 Automatorの実行は以下のような内容で実行しています。 -(BOOL)imageIcon(NSString *)filePath // 画像ファイルパス { NSTask *task = [[NSTask alloc]init]; NSURL *urlfilePath = [NSURL fileURLWithPath:filePath]; NSString *Command = [NSString stringWithFormat:@"/usr/bin/open"]; NSArray *argumets = [NSArray arrayWithObjects:@"-a", @"Automatorアプリのパス", [NSString stringWithFormat:@"%@",urlfilePath], nil]; [task setLaunchPath:Command]; [task setArguments:argumets]; [task launch]; [task waitUntilExit]; // 処理が完了していないのに処理を継続するのを防ぐ為、sleep [NSThread sleepUntilDate:[NSDate dateWithTimeIntervalSinceNow:3]]; if([self processList:@"Automatorアプリ名"]){ //psコマンドを実行して、処理中ならYESを返す。 [NSThread sleepUntilDate:[NSDate dateWithTimeIntervalSinceNow:3]]; } [task release]; return YES; } 上記の関数を各画像の処理時に呼び出しています。 上記の関数の先頭部にreturn YESで強制的に処理をすると、フリーズは発生しません。 また、フリーズした時は、Automatorアプリが実行中のままとなりますが、アクテビティモニタで見るとAutomatorアプリはありません。 Xcodeのコンソールにも、何も表示はありません。 説明がまとまっていなくてすいません。 どなたか、Objective-Cに精通されておられるかたおられまいたら、アドバイスをお願い致します。

ブラウザの種類によって、処理を分岐。 以下のような感じで、ブラウザの種類（SAFARI、OPERA、FIREFOX、EXPLORERなど）によって、 perlの処理を分けたいのですが、やり方がわかりません。 （もちろん、以下は、正常に動作しません。） //↓=========================================== <script language="JavaScript"> <!-- window.onload = function(){ str = navigator.appName.toUpperCase(); if (str.indexOf("SAFARI") >= 0) browser_Name = "SAFARI"; if (str.indexOf("NETSCAPE") >= 0) browser_Name = "NETSCAPE"; if (str.indexOf("OPERA") >= 0) browser_Name = "OPERA"; if (str.indexOf("FIREFOX") >= 0) browser_Name = "FIREFOX"; if (str.indexOf("EXPLORER") >= 0) browser_Name = "EXPLORER"; if (str.indexOf("MICROSOFT") >= 0) browser_Name = "EXPLORER"; if (browser_Name == "SAFARI"){ EOM $a="1"; print <<EOM; } if (browser_Name == "NETSCAPE"){ EOM $a="10"; print <<EOM; } 　： } // --> </script> //↑=========================================== どうかご教授願います。よろしくお願いします。

リクエストの待ち時間が期待通りになりません。 5秒以内にリクエストが行われた場合は、ループとスリープで待たせて、ログに記録されているタイムから5秒以上経過した時点で、新たにログにタイムを記録させたいと思っています。 複数人で同時アクセスもありますので、ループ内で常に最新のファイルを読み込む必要がある？ので、 以下のように書いてみましたが、5秒以内にリクエストした場合、通常は1秒待てば処理が終わるはずなのですが、ループが途中で終わらずに20秒待たされ、$flag==0のまま終わります。 適当な知識しかなくて恥ずかしいですが、どこか間違えている場所があればご指摘くださると幸いです。 my $logfile = "request.dat"; my $time = time; my $i = 0; my $flag=0; while ($i < 20) { $i++; open(IN, "< $logfile"); my ($request_time) = <IN>; close (IN); if($time < $request_time+5) { sleep(1); } else { $flag=1; last; } } if($flag==0){&error;} else { open(OUT,">$logfile"); print OUT $time; close(OUT); }

WWW::Mechanizeの文字コードについて質問 以下のようなソースコードを書いて実行してみたのですが どのサイトを取得しても、すべて文字コードがUTF8だと認識されます。 ------------------------------------------------------- #!/usr/bin/perl #WWW:MechanizeでHTMLの取得 use WWW::Mechanize; $w = WWW::Mechanize->new(); $w->get("URL"); $html=$w->content; #文字コードの判別 use Encode; use Encode::Guess qw/ascii utf8 euc-jp shiftjis 7bit-jis/; my $dec = Encode::Guess->guess($html); print$dec->name; ------------------------------------------------------- 例えば以下のサイトは文字コードがEUC-JPですがこれもprintされるのはUTF8となってしまいます。 http://barukanlog.blog31.fc2.com/blog-entry-541.html WWW:Mechanizeでサイトを取得し、サイトの文字コードを調べてすべてsjisにする ということがしたいのですが、すべてutf8に判断されて先へ進めないんです。 何か設定やメソッドを追加しなくてはいけないのでしょうか？ わかりにくい質問かとは思いますがご回答お願いします。

cron設定時のディレクトリの絶対パスについて 楽メールproというメール配信cgiをcronを利用して 使いたいと思っています。 しかし、説明を見ても全く意味が分からず、 楽メールpro側もcronに関してはサーバーにより 違う為、サポートが出来ないとの事でした。 サーバー側も特定のツールについてのサポートは出来ないとの事で 困っています。 そこでお詳しい方がいましたら 教えて頂けると大変ありがたいです。 サーバーはさくらのレンタルサーバのスタンダードです。 こちらは楽メールproのクーロンの設定方法のページです。 http://www.raku-mail.com/manual/cron.html まず、ここのsend.cgiのdistributeディレクトリの絶対パスの部分は 具体的にはどうすれば良いのでしょうか？ 絶対パスの調べ方は載っているのですが、絶対パスが例えばaaaだとしたら、 $myroot = '/home/ホームディレクトリ/distribute/'; の、どこにどの様に記入すれば良いのでしょうか？ 次にCRONの設定の部分なのですが、 これは記載の事をやらなくても、 さくらのレンタルサーバのcronの設定をすれば良いのでしょうか？ 教えて頂けると大変ありがたいです。 どうぞよろしくお願い致します。

PerlのWWW**Mechanizeのオブジェクトから中身を取り出す方法。 WWW:Mechanaizeでリンクの一覧を取得しようと思い 以下のようなコードを書きましたが、リンク一覧がWWW::Mechanize::Linkオブジェクトで取得されます。 解説文を読んでもここからどうやってテキストのアドレスを取得すればいいか分からないです。 何かメソッドを実行すればよいのでしょうか？ わかりにくい質問かと思いますがご回答お願いします。 ……………………………………………………………………………… #WWW:Mechanizeの読み込み use WWW::Mechanize; #サイトの取得 $w = WWW::Mechanize->new(autocheck => 0); $w->get("URLが入ります。"); @link_list=$w->links; foreach ${_} (@link_list){print"${_}\n";} 　　　　↓ WWW::Mechanize::Link=ARRAY(0x243c564) WWW::Mechanize::Link=ARRAY(0x243c564) とオブジェクトで返されてしまう。 ………………………………………………………………………………

PerlからDB接続し、データ登録時のエラー処理について DBにデータを登録するときにエラー処理を加えたいと思っていますが、 色んなサイトを参考にさせて頂いて、下記のようにしてみたのですが うまくできません。 $sth = $db->prepare(" INSERT INTO DBNAME (hinmei,su,tani,tuikabi) VALUES($hinmei,$su,$tani,$hiduke) "); if(!$sth->execute){ 　print "接続エラー"; 　exit; } または、 $sth = $db->prepare(" INSERT INTO DBNAME (hinmei,su,tani,tuikabi) VALUES($hinmei,$su,$tani,$hiduke) "); $sth->execute or &error('DBに登録出来ません'); 両方とも登録出来なければエラーメッセージを出すように してみたのですが、キー項目が同じものを登録しようとすると $sth->execute この部分でとまってしまうらしく、次の処理に行きません。 もちろん、キー項目が同じでなければDBに登録出来ます。 どうすればエラー処理の設定ができるでしょうか。 教えてください。 お願いします。

CSVファイルを読み込み、ファイル名を変更。 使用言語はperlです。perlは初心者です。 アルゴリズムが、 CSVファイルを読み込み→２次元配列に格納→ファイル名変更 という流れになっているプログラムを作成中です。 CSVファイルの中身は あ.txt , a.txt い.txt , b.txt う.txt , c.txt です。 CSVファイルを読み込み２次元配列に格納するプログラムは以下のようにしました。 ----------------------------------- $i= 0; open IN, "sample.csv"; while (<IN>) { my @data = (); @data = split (/,/); for (0..@data) {$jdata[$i][$_] = "$data[$_]";} $i++; } close IN; ---------------------------------------- 「あ.txt」を「a.txt」に変更しようとして、この中に rename $jdata[0][0] , $jdata[0][1] ; と書いてみましたが、変換されません。 どう書けばよいのでしょうか。よろしくお願いします。

文頭が一致するものの末尾を置換したい。正規表現で実現できるでしょうか？ 頭に「AN」と付いたら、末尾のカンマを1つ削除というような置換を行いたいと 思っています。 例： AN,,,,,,, ↓ AN,,,,,, にしたい。 頭の文字以降はランダムで、末尾にカンマということだけは同じです。 ランダムなので、普通にメモ帳で置換ということは出来なさそうですし、 サクラエディタなどで正規表現を使ってあげたらいけるのかなと思ってるのですが、 疎いのでどうしたら良いかわからず困っております。 ご教授いただけないでしょうか？

NSString *path = [[NSBundle mainBundle] pathForResource:@"Dat"ofType:@"plist"]; NSMutableDictionary *dic = [[NSMutableDictionary alloc]initWithContentsOfFile:path]; NSArray *array = [[NSArray alloc]init]; for (id keys in dic) { array = [dic objectForKey:keys]; } *dicには、下記のキー、値が入ってます。（NSLOGで確認しました。） D = ( DAT,DIOP,DSE );... N = ( NET,NW );... Y = (YEA,YAC ); 上記のコードだと、値が全てarrayに格納されませんでした。 なぜか、キーがNの値だけが格納されてしまいます。 全てのキーの値を格納するには、どうしたらよいのでしょうか？ よろしくお願いします。

webデザイナーです。 サーバーやDBについてはあまり詳しくないので教えてください。 レンタルサーバーをレンタルしております。 レンタルサーバー→xserver xserverでは、ボタン一つでwordpressをインストール機能がついてますので、それでwordpressをインストールして、ブログを更新していきたいと思っております。 その際には、ブログの記事のデータは、データベースに保存されていくのでしょうか？ と言いますのも、xserverではX10プランでHD容量が10Gまで利用が可能なのです。 で、一方、データベース容量は MySQL4 50MB MySQL5 100MB と書いてました。 ※この容量を著しく超過する場合や、DBの負荷が大きい場合は、リソース制限の対象となる場合があります。 とも記述有りです。 wordpressで更新した記事がデータベースに全て保存されていくとすれば、毎日ブログを更新していけば、50Mにしろ、100Mにしろ結構すぐに到達してしまうような気がするのですが・・・・。 10Gならめちゃくちゃ余裕がありますが、100Mだとブログ更新もすぐに制限値が来て厳しいなぁ・・・と思うんですが、この認識はあってますか？ 詳しい人いたら教えてください。

perlを利用して開発をしています。 iphoneでソースを見て試行錯誤をしようと 考えているのですが、わかりやすく 見れるようにするために、ソースコードを色付けして htmlファイルを出力するようなフリーソフトは ありますでしょうか？

perl cgi の開発環境 cやc++ならＶＣ＋ＥＥ、javaならeclipseという風に開発用アプリケーションがあると思いますが、 perl cgiの場合はそういったアプリケーションはないのでしょうか？ メモ帳で作るのが普通なのでしょうか？

PLAYERS表 PID（選手ID)　　PNAME(選手氏名） M001 　　　　　　JUMBO OZAKI M002 　　　　　　KING KAZU 主キーは、PID で、プログラムを作成するのですがエラーが出ます。 create tabre PLAYERS ( PID char(4), PNAME varchar(15), primary key (PID) ); と、入力すると ERROR 1050 (42S01):table "players" already exists と表示されます。