プログラム
http://d.hatena.ne.jp/gigi-net/20090421/1240324155 またまたこのネタ。 今回も変更なしでSleipnir(2.8.5+IE8)のSeaHorse、Firefox(3.0.11)のGreasemonkeyのどちらでも動作する。 ちなみに括弧内は動作を確認したバージョンだが、そんなに古いバージョンで…
http://d.hatena.ne.jp/gigi-net/20090421/1240324155 例の物をconeco.netでのASIN検索にも対応させてみた。 ついでにSleipnir/Firefox(3.0.10で確認)両対応。改造することなくどちらでも動作可能。 ただしFirfoxで動かすときには一つだけ注意点があって、そ…
http://d.hatena.ne.jp/gigi-net/20090421/1240324155 今さら説明するまでもないかもしれないけれど、アマゾンの商品ページを開いたときにカカクコムの最安価格と比較し、どちらが安いのかを表示してくれるスクリプト。 Firefoxもインストールしているものの…
Win32::GuiTestというモジュールがある。 これのバージョンは現在1.54で、CPANを使ってインストールできる…はずが、テストの部分で止まってしまう。 これは、テストが英語版のCALCを想定して作られているのが原因で、何カ所か書き換えることでテストを通すこ…
13日02:15 コメントで指摘のあった部分を訂正＆追記。 16日21:20 ブロック外のため、FORにする必要の無かったファイルサイズ取得部分を修正。 はじめに FCE Ultra(以下FCEU)というファミコンエミュレータがある。 これにはムービー記録の機能が付いていて、…
ニコニコ動画にExcelで長門有希というのがある。 これは、エクセルのセルに色を付けてドットに見立て、それで絵を表示しようという試みである。 知り合いにこれの仕組みについて聞かれたとき、最初はエクセル画 for ＢＭＰというのを使ってるんじゃないかと…
Explzhというアーカイバがある。 けっこう色々な圧縮方式に対応していて、普通に使ってる分には他には必要ないんじゃないかとも思うんだけど、ちょっと最近困ったことが起きた。 RARという拡張子を持つファイル。もちろんこれも対応形式の一つで、アーカイブ…
question:1113446139 以前、自分でも同じ疑問に当たり、考えた方法はちょっと違う。まあ回答に出ている方法の方が楽そうだけど…。 まず、cgiを作り、keyword という名前で保存、アップロードする。パーミッション設定や転送モードは普通のcgiと同じ。 そして…
http://webmaster.hatena.ne.jp/1111719634 二度までしか答えられないと言われたので。 type="checkbox"に値を入れたい イコール 初期値を設定したい と解釈して。 こちらからどうぞ。
えー、最近この日記がおろそかになっているというか、あまり気合いが入っていないわけですが、その理由の一つとして「ラグナロクに復帰した」というのがあるのです。まあ他にも色々とあるんだけども。で、そっちで遊んでいると当然こっちに割り当てられる時…
プロクシとして動作し、webページを見るときのサーバとのやりとりを覗いたり、内容を変更したりするプログラムがある。 たとえば広告を非表示にしたり、悪意有るスクリプトを無効にしたり、使い方は色々。たぶん知ってる人も多いかと思うけれどもその中の一…
以前「IEのお気に入りを一括してはてなブックマークに登録したいけどどうすればいいか」という質問があってその時に思いついたスクリプトの話。と言っても結局まだ完成していないんだけど。 何をする物かと言うと、現在開いているページ中にあるリンクを全て…
またまたアマゾンのアレに関連した話を。 せどりのプログラムを、個人的に使っている分にはよほど無茶な使い方をしない限りは問題とはならないだろうけれど、一般公開していてそれでそこそこのアクセス数があるとやっぱり負荷が問題になってくる。 そこで、…
amazonのアレ、XMLを扱うモジュールを使って書き直してみようかと思ったものの、やはりこんな簡単な処理では本格的なパーサーを使うよりは正規表現を使ってお手軽に済ませてしまった方がよさそう。たとえば use XML::DOM; my $parser = new XML::DOM::Parser…
ここで書いた物をちょっと修正。 どこが変わったかというと、値段順にソートする部分。 my @nlist = map {$_->[0]} sort {$a->[1] <=> $b->[1]} map { [$_, (split ':', $_)[1]] } @list; # シュウォーツ変換 一般的に書くと、 my @nlist = map {$_->[0]} so…
またまたアマゾンネタ。しかもネタそのものは前回と同じ。何が違うのかというと… ここのコメント欄でxmlでデータを受信する方法が書き込まれていたため、それを参考にxmlバージョンにしてみたというわけ。 本当はxmlをパースするモジュールを使いたかったん…
今更あのエントリにトラックバックが飛んでくるとは…ちょっとびっくり。 ともかくこちらから飛んできたんでちょっと見てみたら手直しするところが判明したんでいじってみた。 一つは出品されている本の総数の判定がおかしかったこと。総数の判定を値段が出て…
id:marutahiko氏の質問question:1105319343を見て、なんだか面白そうだったから作ってみた。 画面イメージはこんな感じ。なんとなく嘘っぽく見えてしまうけれど、実際にCGIとして動作し、携帯からも見られるのです。 少し前からamazonからxmlでデータを取得…
ドロップダウンリストをクリックした際に表示される選択肢を一度にたくさん表示するようにしたいのですが、そういう指定は可能でしょうか？ブラウザーはIEです。デフォルトでは30行ぐらいしか表示されません。これを出来れば画面の上下いっぱいに表示したい…
ならばコンパイラを書いたことがある人が書いたコードはどのようになるのだろうか。というか何らかのコンパイラを書くっていうのはそれほどまでに当たり前の事だったのか…。当然書いたことなどない。
question:1103246823 このエラーが出るのは許可された範囲外のメモリを読み/書きしようとしたからで、はっきり言ってほとんどの場合は原因不明。まあプログラム自体のバグで特定の操作をしたときに計算結果がおかしくなって範囲外にアクセスしてしまうことも…
それは「太陽誘電を使っている限り海賊版ではありません。あなたは今までに海賊版で太陽誘電が使われているのを見たことがありますか？無いですよね。だから海賊版ではないんです」*1と同レベルの理屈のような気がする…いや、なんでもないです。 さて、何は…
というわけでベンチマークをしてみた。ソースは以下の通り。 use Benchmark; @html = (...); # 配列定義は省略 50個 timethese(100000, {'TEST1' => '&test1;', 'TEST2' => '&test2;', }); exit; sub test1 { $ignore = 0; $ignore = 1 if !$ignore and grep…
うーん…だったらどんな回答なら納得するんだろうか。その模範回答ってのを見せて欲しいな。これは単なる独り言。 今回は短い。非常に短い。なんたって32行目の下に次の行を追加するだけ。 $ignore = 1 if !$ignore and grep !/^(["']).*\1$|^[^"']/,@eles; …
質問の雨嵐 人力検索で質問をしまくっている人がいる。人力検索は無料のサービスではないし答える人も居る（ポイントが貰えるしね）わけで、その行為が悪いと言っているわけではない。PerlやRuby、JavaScript等の言語は特に難しいと思うし（他にももっと難し…
最近のマイブーム（その表現自体もう古いかな）は map。map と言っても地図の事じゃなくて perl で言うところの関数 map だ。 あ、perl 熟練者には物足りないかと。 この関数が存在するのは以前から知っていたしけっこう見かけていたものの、イマイチその動…
