IIS5+レガシーASPでメモリを食いつぶす

Posted on 2nd 6月 2009 in Web, Windows, ソフトウェア, プログラム, レガシーASP, 運用

IIS5+レガシーASPが稼動しているサーバで、SQL Serverをつついて結果を返すアプリが正常に表示できない障害が発生した。
原因は未だ不明だけど、以下のASPを動かすとDLLHOSTの実メモリ、仮想メモリを食いつぶした後、inetinfoが同様にメモリを食いつぶす事象が発生した。

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22

<%
On Error Resume Next
 
Dim file
Dim objFSO
Dim objTS
Dim line
 
file = "ここで存在しないファイルパスを指定する"
 
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTS = objFSO.OpenTextFile(file, 1 , True)
 
Do Until objTS.AtEndOfStream = True
    line = objTS.ReadLine
    Response.Write(line & "<br>")
Loop
 
objTS.Close
Set objTS = Nothing
Set objFSO = Nothing 
%>

ファイルの存在チェックを行ってループに入る前に終了させれば回避できるが、こういったASPがどっかに眠っているのだろうか。
IIS5のメモリリーク防止パッチを適用しても改善されなかった。

comments: 0 » tags: , , ,
このエントリをはてなブックマークに追加このエントリをdel.icio.usに追加このエントリをLivedoor Clipに追加このエントリをYahoo!ブックマークに追加

[Perl]localtimeで日本時間にならない場合の対処

Posted on 28th 5月 2009 in Perl, プログラム

Perlのlocaltime関数を使って、以下のようなコードで日本時間を出力しようとしても、何らかの原因（海外から取り寄せたサーバでタイムゾーンが違うとか）で正しく出力されない場合がある。

▼環境によってはうまく動かないコード

1

my ($sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst) = localtime(time + 32400);

この場合、gmtime関数を使えば、必ずグリニッジ標準時を返すので以下のコードで環境に依存せずに日本時間が出力可能になる。

▼環境に依存しないコード

1

my ($sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst) = gmtime(time + 32400);

▼動作確認用コード

1
2
3
4
5
6
7
8
9

use strict;
use warnings;
use Perl6::Say;
 
say gmtime time;
say gmtime;
say gmtime time + 32400;
say localtime time;
say localtime;
comments: 0 » tags: ,
このエントリをはてなブックマークに追加このエントリをdel.icio.usに追加このエントリをLivedoor Clipに追加このエントリをYahoo!ブックマークに追加

[Perl]ドコモのiメニュー検索のキーワードを取得する

Posted on 22nd 5月 2009 in docomo, iモード, Perl, SEO, Web, ソフトウェア, プログラム, モバイル

ドコモ2009夏モデルのリファラー出力記念。
ドコモのiメニューで検索した時の検索キーワードを取得します。（たぶん）
$uriの値は実際はちょっと異なります。

1
2
3
4
5
6
7
8
9
10
11
12

use strict;
use warnings;
use Perl6::Say;
use URI;
use URI::Escape;
use URI::Query;
 
my $uri = 'http://docomo.ne.jp/?key=%41%42%43';
 
my $query = URI->new($uri)->query;
my $key = (URI::Query->new($query)->hash)->{key};
say uri_unescape($key);

ドコモのドメインじゃなくてもkeyパラメータがあったらデコードしちゃいますが・・・

comments: 0 » tags: , , , , , , ,
このエントリをはてなブックマークに追加このエントリをdel.icio.usに追加このエントリをLivedoor Clipに追加このエントリをYahoo!ブックマークに追加

Windows7RCでブルースクリーン

Posted on 16th 5月 2009 in OS, Windows, プログラム

Skypeの「設定」メニューをクリックしただけなのに、何回も画面のチラツキが発生して音沙汰がなくなったので、Ctrl+Alt+Delしたら発生。

comments: 0 » tags: , ,
このエントリをはてなブックマークに追加このエントリをdel.icio.usに追加このエントリをLivedoor Clipに追加このエントリをYahoo!ブックマークに追加

今までどのくらいプログラミング言語を触ってきたか(3秒で飽きたものも含む)

Posted on 11th 5月 2009 in プログラム

ぼくのおもひで。

・N88BASIC
ベーマガ読んでたら必須

・C
PC98のゲーム改造するのに必須だった。すっかり忘れてPerl/XSに手が出ない。

・C++
オブジェクト指向とか知らんまま何となく勉強した。

・Perl
CGI作る言語だと思ってた。今一番使ってる。JPAに加盟した。

・CASL
情報処理の試験対策のため勉強した。結局Cの問題正解して受かった。

・Visual Basic～6.0
GUIのおもちゃを作った程度。

・Visual C++～6.0
ハンガリアン記法の意味がわからなすぎて挫折した。

・COBOL
入社後の研修で習った。未だに業務で使ったことがない。

・HSP
USB認証キーのID/PW受けとるだけのツール作った。もう二度と使わないだろう。

・PHP
Perlでmod_perlの使い方が分からずにPHPに逃げた。今はお守り程度。

・Whitespace
ネタ

・Brainf*ck
ネタ

・Java
OOPのPerlを理解するために勉強を始めた。SJC-AとSJC-P取った。業務でまったく使わない。

・Ruby
Railsを使うために勉強したがまともなものは完成しなかった。ちょっとしたツール作成に使う。

・VB.NET
VSTOの検証を行った時にC#だと無駄な引数を大量に記述しなきゃならなかったのでこっちを使った。もうやってない。

・C#
GUIのツール作るときに使う。

・Python
RedHatの設定ファイルいじるためにちょっとだけかじった。

・Javascript
Webアプリ作るときに必須だが、いまいちとっかかりがなくマトモに学習できてない。ちゃんと勉強したい。

comments: 0 » tags:
このエントリをはてなブックマークに追加このエントリをdel.icio.usに追加このエントリをLivedoor Clipに追加このエントリをYahoo!ブックマークに追加
« Previous Next »