codeなにがし: l-w-iが投稿したソースコード・ノウハウッ！の一覧

JavaScriptでepoch timeをYYYY/MM/DD HH:MM:SSに変換する

2008-10-15T16:45:16+09:00

JavaScriptでJSONを扱っていて日付データ(epoch time)を「YYYY/MM/DD HH:MM:SS」形式に変換する簡単な方法が分からなかったので自分で書いてみました。みな同じようなことをやっているのでしょうか?

JavaScriptで連想配列のキーを取り出す

2008-10-10T20:39:24+09:00

JavaScriptで連想配列のキーを取り出す方法です。今まで知らなかったので書いておきます。

[wiki] ラボまとめ

2008-12-15T12:01:36+09:00

Perlで経過日数を求める

2008-07-11T23:56:26+09:00

Perlで1970/1/1からの経過日数を求める処理です。 JavaScriptとの違いは計算単位がミリ秒ではなく秒ということくらいですね。

JavaScriptで経過日数を求める

2008-07-11T23:31:30+09:00

JavaScriptで1970/1/1からの経過日数を求める処理です。なんとなく安直な気もしますが急いで作る必要があったので...

[他のやり方ある？]COBOLで3の倍数と3が付く数字のときだけアホになる

2008-08-24T02:38:59+09:00

なぜか突然COBOLがやりたくなったので、調子にのって書いてみました。 OpenCOBOL-1.0で動作確認済です。インストールも簡単でした。 http://l-w-i.net/m/20080626_01.txt

Perlでエラートラップ

2008-06-26T01:46:23+09:00

Perlでエラーを補足するのにみなさんはどのような方法をとっていますか? 例えばXML::RSSモジュールを使ってRSSのパースを行う場合、RSSにゴミ(制御コードとか)が入っていてwell-formedになっていないとモジュール内でエラーが発生して全体の処理が中断してしまいます。これを防ぐために僕はエラーの起きそうな処理をevalブロック内に入れてエラー自体が全体の処理を止めないようにしています。他に良い方法があればぜひ教えて下さい。

シェルスクリプトで階層のあるディレクトリを走査する

2008-06-18T23:43:34+09:00

シェルスクリプトで作ってみました。ローカル変数を定義する「local」を使っているのでbash以外では使えないかもしれません。

Perlで外部プログラムを実行し、結果を取得する

2008-06-16T16:30:14+09:00

ponsukeさんや台北猫々さんがいろいろな言語で「○○で外部プログラムを実行し、結果を取得する」というコードを公開されているので僕もPerl版を作ってみました。といっても特に工夫することもないですが、同じ処理をいろいろな言語で比較するのは面白いですね。

Perlで階層のあるディレクトリを走査する

2008-06-16T16:08:02+09:00

台北猫々さんやponsukeさんがいろいろな言語で「○○で階層のあるディレクトリを走査する」というコードを公開されているので僕もPerl版を作ってみました。 mikedaさんのコーディングに似せてあります。 (*) File::Find モジュールを使うという意見もありますが...(笑)

[wiki] ブックマークレット情報

2008-10-01T15:38:22+09:00

codeなにがしの任意のユーザの記事一覧取得

2008-05-28T20:49:44+09:00

僕の個人サイトのトップページに自分がcodeなにがしに投稿した記事をGood Job順に表示していますが、codeなにがし運営元のOpenTypeさんがAPIを提供してくださっているおかげで簡単に記事の情報が取得できています。個人サイト http://l-w-i.net/ codeなにがしAPI http://code.nanigac.com/help/api そこで、エラー処理などを省いたメインの処理部分を公開します。言語はRuby-1.8.6です。処理の流れは以下のようになっています。 1. 任意のユーザIDの記事一覧を取得(RSS) 2. 上記の記事一つ一つについて詳細情報を取得(API) タイトルやGood Job数などの他にも更新日付や記事全文なども取得できるので目的に応じていろいろ使い道があると思います。

Perlで10進からExcelのセル番号(A,B,C...)を求める

2008-04-23T18:39:33+09:00

とある仕事で必要に迫られて作ってみました。引数に10進を入れて関数を呼ぶと対応するセル番号(A,B,C...)が返されます。尚、以下の処理は入れていません。 - 引数の妥当性チェック - バッファオーバーフロー対策 - その他エラー処理

SQLiteデータ抽出ツール

2008-04-11T14:33:05+09:00

SQLiteでテーブル毎にデータを抽出するツールです。 SQLiteの「.dump」を使い、テーブル毎にCREATE TABLE文を含むそのテーブルの全ての構成要素を抽出します。使い方は2種類あって、指定したDBに対して「-a」で全テーブルを抽出、「-f 」で中に書かれているテーブルのみ抽出します(行頭に#があればコメント)。 usage: unload [-a|-f conf_file] db -a : unload all tables -f conf_file : unload specified tables エラー処理(*1)はきちんとやっていませんが利用シーンを特定して使っている(*2)ので個人的には問題ありません。 (*1) 指定DBが本当にDBかどうか、ディスクに空きがない場合はどうするか等々 (*2) Firefox3のブックマーク情報取り出しとか。 http://l-w-i.net/m/20080411_01.txt 純粋にデータだけ抽出するのもいいのですが、テーブル自体を再作成する必要が出てきた時などに困るので僕は「.dump」のほうが好みです。

awk中でシェルの変数を使う方法

2008-01-11T00:04:53+09:00

awk中でシェルの変数を使う場合、まず変数に空白が含まれていることを考慮して変数を「""」でくくり、変数を表す$がシェルによって解釈されないようにさらに全体を「''」でくくって使います。同じような使い方をするsedなどでもこの考え方が使えます。 who | awk '/'"${USER}"'/ {print}' あるいはawkのオプションでawk用変数を定義し、それを使うという方法もあります。 who | awk -v chk="${USER}" '$1 == chk {print}'

Rubyで英文メールを送信(net/smtp)

2007-12-11T01:53:33+09:00

genkiさんがRubyで日本語メールを送信する方法を書かれていますが(関連するなにがしを参照)、僕は英数字に限ってメールを送信する必要がでてきたので急遽簡単なプログラムを書きました。こんなに簡単に書けるなんて、Rubyをはじめ、関連するライブラリを開発してくださったかたがたに感謝です。そして、C言語でソケットプログラミングしていた時代が遠い昔のようです...

[wiki] codeなにがしについて取り上げているサイト

2008-08-25T22:33:10+09:00

シェルスクリプトで当日変更ファイルを表示

2008-01-10T23:48:20+09:00

当日変更したファイルが知りたい時によく find . -mtime -1 -ls などとやって過去1日以内に変更されたファイルを調べたりしますが、これだと昨日作成されたファイルも表示されてしまって使いにくいことがあるので、僕は以下のようなスクリプトを作って使っています。処理の流れとしては以下のようになります。 1. 現在時刻(時,分)を取得 2. それを分に直す(例えば1時5分なら65分) 3. findの-mminオプションを使って2.の時間(分)以内に変更されたファイルを表示もっといいやりかたがあればどなたかご教示下さい。

Perlでホスト名 <-> IPアドレス変換

2007-11-08T19:43:59+09:00

Perlでホスト名からIPアドレスを求める(またはその逆)にはいろいろな方法があると思いますが、僕は以下のようなやりかたをしています。もっとスマートな方法(というか、王道)があればご教授いただけると嬉しいです。

Ajaxでサーバ側のデータを強制的に取得する

2007-11-02T16:36:01+09:00

サーバ側のログをブラウザで監視するためにAjaxを使っているのですが、ブラウザによってはログの内容が変わってもサーバからデータを取得せずにブラウザのキャッシュを使ってしまうことがあります。これを回避するためにIf-Modified-Sinceリクエストで過去の日付を送って毎回強制的にデータを取得するようにしています(トラフィックは増えますが、データを取得できないよりはマシなので)。 (*) ソース中のXMLHttpRequest()はあらかじめクロスブラウザ対応になっているものとします。

JavaScriptで安全にオブジェクトの存在チェックをする

2007-10-31T02:31:23+09:00

JavaScriptでオブジェクトが存在するかどうかを判定する場合、「if (obj)」と書いたりしますが、一部の古いブラウザではobjがundefinedの時にfalseを返さないようになっているので意図した動きにならないことがあります。これに対応するためには、以下のようにオブジェクト名の先頭に「!!」を付けて二重真偽チェックを行うと必ずtrueかfalseを返すようになるので安全です。

Rubyスクリプトに環境変数の値を引き渡す

2007-10-26T13:04:31+09:00

レンタルサーバ等の自由に環境変数が設定できない環境において、必要な環境変数をセットしてそれをRubyスクリプト内部で利用したい場合、以下のようにシェルスクリプト内部にRubyスクリプトを含有することによって可能となります。詳しい説明はRubyのリファレンスマニュアルを参照して下さい。 http://www.ruby-lang.org/ja/man/?cmd=view;name=Ruby%A4%CE%B5%AF%C6%B0#a.a5.b3.a5.de.a5.f3.a5.c9.a5.e9.a5.a4.a5.f3.a5.aa.a5.d7.a5.b7.a5.e7.a5.f3

RubyでRSSをパースする

2007-12-13T14:31:38+09:00

以前PerlでRSSリーダを作ったことがあるんですが、Rubyでも簡単に作れそうなのでサンプルを作ってみました。 RSS/Atomのバージョン毎の差異吸収とかエラー処理などはとりあえず入れていません。

Perlで外部コマンドの結果を取り込む

2007-10-27T23:21:14+09:00

Perlで外部コマンドを実行するには通常system()を使いますが、その結果を取り込んでPerlで処理する必要が出てきてsystem()ではうまくいきませんでした。少し調べたところ、単にコマンドをバッククォートでくくれば結果が取れることが分かりました。そういえば普段はopen()の第2パラメータにコマンドを指定しているのを思い出しました。既出かもしれませんが、備忘録として両方の手順を書いておきます。