sample_ の回答履歴

CGIに関してです。 下記にて入手可能なフリーのCGIが動かなくて困ってます。 詳しい友人曰くソースが古すぎるのではないか？ ということでした。 当方所有のサーバーはロリポップレンタルサーバーで もちろんCGI設置可能です。 過去にも何点かフリーのCGIを動かしたことはあります。 本当にCGI本体の問題なのか検証できる方はいらっしゃいませんでしょうか？ CGI本体： http://www.minicgi.net/cgi2/list.html 紹介サイト（サンプル2） http://www.minicgi.net/cgi2/

CGIに関してです。 下記にて入手可能なフリーのCGIが動かなくて困ってます。 詳しい友人曰くソースが古すぎるのではないか？ ということでした。 当方所有のサーバーはロリポップレンタルサーバーで もちろんCGI設置可能です。 過去にも何点かフリーのCGIを動かしたことはあります。 本当にCGI本体の問題なのか検証できる方はいらっしゃいませんでしょうか？ CGI本体： http://www.minicgi.net/cgi2/list.html 紹介サイト（サンプル2） http://www.minicgi.net/cgi2/

CGIに関してです。 下記にて入手可能なフリーのCGIが動かなくて困ってます。 詳しい友人曰くソースが古すぎるのではないか？ ということでした。 当方所有のサーバーはロリポップレンタルサーバーで もちろんCGI設置可能です。 過去にも何点かフリーのCGIを動かしたことはあります。 本当にCGI本体の問題なのか検証できる方はいらっしゃいませんでしょうか？ CGI本体： http://www.minicgi.net/cgi2/list.html 紹介サイト（サンプル2） http://www.minicgi.net/cgi2/

エクセルマクロの初心者です 以下のようなテキストファイルをエクセルにコピーするマクロを作りたいです。 １、ボタンをクリックするとテキストファイルを選択する画面になる ２、テキストファイルを選択すると、その中から欲しい行のみエクセルのsheet3のA1、B1の順にコピーされる ３、テキストファイルのコピーしたい行はキーワードの間のもの 例（キーワードをAとBとする) xxx xxxx,xxxxxx xxxx,A yyyyy yyyyyyy yyyyyy,yyyy zzzzzzz zzzzzzz z zzzz,B このような形式のAとBの間にあるyyyyy yyyyyy yyyyyy,yyyyをコピーしたい xxx xxxx,xxxxxx xxxx,A yyyyy yyyyyyy yyyyyy,yyyy xxx xxxx,xxxxxx xxxx,A ttttt tttttt tttttt,tttt zzzzzzz zzzzzzz z zzzz,B このような場合も混在し、このときはtttt tttttt ttttt,ttttのみコピーする つまり xxx xxxx,xxxxxx xxxx,A yyyyy yyyyyyy yyyyyy,yyyy zzzzzzz zzzzzzz z zzzz,B xxx xxxx,xxxxxx xxxx,A yyyyy yyyyyyy yyyyyy,yyyy xxx xxxx,xxxxxx xxxx,A ttttt tttttt tttttt,tttt zzzzzzz zzzzzzz z zzzz,B このようなテキストに対して実行すると、Sheet3に yyyyy yyyyyyy yyyyyy,yyyy ttttt tttttt tttttt,tttt となるようにしたい 詳しい方、知恵を貸してください よろしくお願いします。

Perlのrename関数で、エラーがリターン値として返ってくるのは、どんな時でしょうか Ｐｅｒｌのソースコードをざっと見たのですが、追跡しきれません。 どんな時にエラーになるのか教えてください。

条件がそろったらアラーム音を出してくれるマクロを作りたいです。 どなたか教えて頂けたら幸いです。 内容としてはエクセルの計算式でＡとＢの２つの数字を使います。 Ａ，Ｂ共に3～-3の間を0.1づつ変動しています。 条件は 1　ＡＢ共にプラスの状態でＢがＡより大きくなった瞬間にアラームを出す。 2　ＡＢ共にマイナスの状態でＢがＡより小さくなった瞬間にアラームを出す。 この２つの時にアラーム音を出したいのです。 どうかよろしくお願いします。

・Test1とTest2で何が違うのでしょうか？ ・Test1のtenは、this.scoreで生成するインスタンスプロパティへ格納 ・Test2のtenは、どうなっているのでしょうか？ ・どこへも格納していないのに、「new Test2('100');」で文が終わった後、呼び出せている理由は？ ■Test1 var Test1 = function (ten) { 　this.score = ten; 　this.getScore = function() { 　　alert(this.score); 　} } var result1 = new Test1('100'); result1.getScore(); ■Test2 var Test2 = function (ten) { 　this.getScore = function() { 　　alert(ten); 　} } var result2 = new Test2('100'); result2.getScore(); ■下記★部分の「alert(this.score);」「alert(ten);」何れも100と表示されるのですが、中でどういう処理が走ってそういう結果になるのでしょうか？ var Test3 = function (ten) { 　this.score = ten; 　this.getScore = function() { //★　　alert(this.score); 　　alert(ten); } } var test3 = new Test3('100'); test3.getScore();

以下の環境にてURLエンコード（shiftjis)された文字を、UTF8として ブラウザに表示させたいのですが、上手く表示されません。 環境： サーバ：linux apache レンタルサーバ ※Encode.pm、Jcode.pm無し。追加モジュールインストール不可。 Perl version: 5.006001 ソースエンコード：utf-8 実行ソース： ------------------------------------ use utf8; require 'jacode.pl'; #　$mojiに予めURLエンコードされた文字が格納されています。 #　例として「マウス」デコード前（%83%7D%83E%83X）とします。 #URLデコード $moji =~ s/%(..)/pack("c",hex($1))/ge;　 #デコードされたsjis文字をUTF8へコンバート jcode::convert(\$moji, "utf8","sjis"); print ($moji); ----------------------------------- 例のように「マウス」と言う文字が$mojiに格納されている場合、 以下のような文字化けとなってしまいます。 ﾂマ燿ｾﾂス 正常にマウスと表示させるにはどうすればよろしいのでしょうか。 アドバイスを宜しくお願いします。

初歩的な質問で申し訳ありません、 googleでもどのように検索してよいのかわからないので教えてください。 Userformにて作成したコード内にhogehogeという変数を宣言したとします。 これをPublic Sub CommandButton1_Click()内でhogehogeに文字列abcを代入します。 そしてcall　を使ってmodule1の処理を行うのですが、 module1内で変数hogehogeに文字列abcが既に代入されているものとして hogehogeを使いつつ、処理を続けるにはどのようにすればよいのでしょうか？ callで呼ぶ際に変数hogehogeの受け渡しなどが必要なのでしょうか？ （ちなみに全てPublic Subで書いております） 初心者なので質問がおかしいかもしれませんが よろしくお願いします。

初歩的な質問になりますが、ExcelVBAマクロで変数の宣言「Dim wdObj　As New Word.Application」のエラーについて確認させてください。 変数の宣言「Dim wdObj　As New Word.Application」がExcel2007以前では使えないようで、『ユーザ定義型は定義されてません。』というエラーがExcel2007以前で起きます。 Excel2010では問題なく動作しています。 Excel2007以前でも動作する方法をご教授いただけますでしょうか。 お手数おかけしますが、よろしくお願いいたします。

perlでデータを並び替えて整理したいです。 【元データ】 A　a　b A　c　d A　e　f A　g h B　i　j B　k　l B　m　n C　o　p C　q　r C　s　t C　u　v ・ ・ ・ 上記のデータを下記のように並び替えしたいのですが上手くできずに困っています。 どのような記述をすれば良いのでしょうか。間の空白はタブ区切りです。 【目標】 A　a　b　c　d　e　f　g　h B　i　j　k　l　m　n C　o　p　q　r　s　t　u　v D ・ 現在、元データから A B C D ・ ・ というデータを作り、元データと比較していますが上手くいきません。 for($i=0; $i<@key; $i++){ print OUT "$key[$i]"; for($j=0; $j<@data; $j++){ if($key[$i] =~ /$data[$j]/){ 　　　#部分一致 print OUT "$'"; } } print OUT "\n"; } 部分一致の行を正規表現を用いて上手く処理したいのですがやり方がわからず躓いています。 宜しくお願いします。

perlで.txtファイルを読み込むのはどうすればいいのでしょうか？ コマンドライン引数ではなくC言語でいうscanfのようにプログラム実行した後にtxtファイルを指定して読み込ませたいです。 わかる人がいたら教えてください、お願いしますm(_ _;m)

エクセル2003のVBAで質問です（当方初心者です）。 セル内に入力した文字の一部を別のシートの指定したセルにコピーしたいのですが、上手くいきません。 例えば、 sheet1には A1　猿2上野 A2　牛3旭山 A3　亀2横浜 と入力されていて、 sheet2では A1　猿　　B1　2　　C3　上野 A2　牛　　B2　3　　C2　旭山 A3　亀　　B3　2　　C3　横浜 となるように入力したいのです。 コマンドボタンを押したときにそうなるようにしたいと考えています（コマンドボタンの使用などは上手くいっています。） character関数などを用いても「このプロパティまたはメソッドをサポートしていない」と上手くいきません。 宜しくお願いいたします。

初めまして。 私は、今perlを勉強しているのですがperlでどの程度のことが出来るようになったら、人に「俺は、perlが使えるぜ」って言ってもいいんでしょうか？

以下のテキストデータを、それぞれ*までの一行毎に配列に代入したいのですが、if文で*を検索しようとしてもうまくできません。 あいうえお* かきくけこ* さしすせそ* たちつてと* あいうえお* さしすせそ* あいうえお* 以上のものが元のテキストデータで、「あいうえお」を配列の0番目の要素、「かきくけこ」を1番目の要素、「さしすせそ」を2番目の要素・・・というようにしたいです。 現在のプログラムは、 hash.pl use encoding 'shift-jis'; $pattern = '*'; @txt1 = (); while(<>){ if($_=~/$pattern/){ $in=index($_,$pattern); $temp=substr($_,0,$in); push @txt1,"$temp"; } } print @txt1; となっているのですが、これをコマンドプロンプト上で動かすと、 Quantifier follows nothing in regex; marked by <-- HERE in m/* <-- HERE / at hash.pl line 5, <> line 1. というメッセージが表示されます。 *関連で問題があるのはわかるのですが、どうしても解決策が見つかりません。 よろしくお願いします。

for ( 1..$winfo{'LIMIT'} ) { my ( $wkey ) = sprintf( "%03d",$_ ); $wnum{ $wkey } = sprintf( "%s名",$_ ); } とあるのですが、forの括弧の中が、普通と違うので意味が分かりません。 どのような意味になるのでしょうか。 宜しくお願い致します。

学校で「１つのサイコロを振ったとき， ３以下の数字が出た場合，もう一度サイコロを振っても良いものとする． このとき合計が６になる確率を，プログラムを利用して計算せよ」 というperlの課題が出されたのですが、さっぱりわかりません。 どなたか詳しく教えていただけませんでしょうか？

ハッシュの中身の確認ができなくて困っています。 下記のような実行文においてです。 当然、test の戻り値は、スカラーとハッシュです。ハッシュを戻すときには参照渡し記号の\もつけています。 my ($return_code, %hash_data) = test(); 表示しようとすると、 Hash(0x5b04) のような表示にしかなりません、、 (試した表示方法は、下記４つです。) (環境は、WindowsXP上での、ActivePerl-5.10.0.1004　です。) foreach $key ( keys( %Hash ) ) { print "キー値 : $key\n"; print "値 : $Hash{$key} \n " } while ( ( $key , $value ) = each %Hash ){ print "キー値 : $key\n"; print "値 : $value \n " ; } use Data::Dump qw(dump); print dump(\%hash); #print %display_test; 宜しくお願いします。

以下のURLにて同じ質問をしました。 http://soudan1.biglobe.ne.jp/qa4938782.html その時は解決したと思ったのですが、私の勘違いでした。 Undefined subroutine &main::Jcode called at listpage.pl line 220, line 855. というエラーからして、 $value = Jcode($value)->utf8; という記述そのものの問題ではなく、jcode.pmが認識されていないということなのでしょう。 でもプログラムの最初には use Jcode; としてあるし、パスが通っていないことも考えて#!（何と呼ぶんだったっけ？）も #!/usr/bin/perl -I /usr/lib としました。perl.exeをd:\usr\bin/に置いて /usr/bin/perl で良いなら、jcode.pmはd:\usr/libにあるからパスはこれで良いですよね!? ちなみにこのディレクトリにはcgi.pmも置いていますが、cgi.pmは普通に動いてます。 何が問題だと考えられますか？ お手数をお掛けします。

予想配列のあるキーを配列とします。 %hash; @hash{'a'}=['aa','ab','ac']; 一方で普通の配列をスカラ変数として扱うと配列数を表します。 @array=(a,b,c,d,e); $num=@array; # $numは5になる。 それでは $num=@hash{'a}; あるいは 　$num=@{hash{'a'}}; としたらどうなるのって ARRAY(0x2438c4) みたいになって、$numに@hash{'a'}の要素数は入りません。 予想配列の中に格納された配列の要素数を取り出す簡便な方法はないものでしょうか。 お手数をお掛けします。