2006-06-01から1ヶ月間の記事一覧

[]バイト数カウント(Shift_JIS EUC用)

IEの改行は、\r\nになる。 FFの改行は、\nになる。 function getByteCount(s) { var i=0; var nBytes=0; for(i=0;i<s.length;i++){ if(s.charAt(i)=='\n') nBytes++; else if(s.charAt(i)=='\r') ; //カウントしない else if( s.charCodeAt(i)>255 )nBytes+=2; else nBytes++; } return nBytes; }</s.length;i++){>

E-mailアドレスの正規表現

/^[\w\-]+\.?[\w\-]+@([\w\-]+\.)+[\w\-]+$/

全角チェック

if( form.e.value.match(/[ .,;:’”@#$%^&*()+−=A-zあ-んア-ンア-ンー]/) ) { alert("全角"); }

TCPのウィンドウサイズの変更方法

/proc/sys/net/core/rmem_default で設定できる。 routeコマンドで実行中にも変更できる。

SELinuxの無効化

/etc/sysconfig/selinux を開く SELINUX=enforcing SELINUXTYPE=targetedを以下のようにする。 SELINUX=disabled #SELINUXTYPE=targeted

SafariでJavaScriptのデバッグ

Mac

コンソールを開いて defaults write com.apple.Safari IncludeDebugMenu 1Debugメニューが表示される。

文法メモ

Tag Name Contains Substitution Perl that is evaluated and sent as output % ... Perl line A single line of Perl code perl> ... Perl block Perl code Component call A call to another component, possibly with arguments ... init block Perl code…

Masonの設定

/etc/httpd/conf.d/mason.conf を以下のように作成 PerlModule HTML::Mason::ApacheHandler <LocationMatch "\.html$"> SetHandler perl-script PerlHandler HTML::Mason::ApacheHandler </LocationMatch>これで、拡張子が.htmlのファイルがMasonで処理される。

Perl ワンライナー メモ

複数行にまたがる文字列置き換え 例: 以下から <select name="timezone"> <option value="a">... <option value="b">... <option value="c">... </select> ここまでをfooに置き換える。 以下は置き換えない。 <select name="other"> <option value="a">... <option value="b">... <option value="c">... </select>以下のスクリプトでok perl -p -0777 -i.bak -e "s#

IIS上でPHPを動かす

PHP

phpをダウンロードして解凍する。 php というフォルダの中に解凍して、InetPub/Scripts/php に置く。 別の場所でも良いが、アクセス権をゆるくしておかないと、ユーザ名とパスワードを聞かれることがあるので注意。 WWWサーバーのプロパティで、「Home Direc…

Fedora Core 5 上でのmod_perlのセットアップ

オリジナルは、naoyaの「10分で完了、mod_perl 2.0 で Hello, World!」d:id:naoya:20060108:1136692447/etc/httpd/conf.d/naoya.conf という名前で以下を作成 NameVirtualHost *:80 <VirtualHost *:80> ServerName fc5:80 PerlModule mod_perl PerlRequire /var/www/mod_perl/s</virtualhost>…

MSDNメモ

Subscribers -> not your subscription? -> Sign in

Perlメモ

@array = (1, 3, 5); # 配列 $ref = [1, 3, 5]; # 配列の参照 @array == @{$ref} == @$ref; # 全部等しい \@array と $ref は、値は同じ。 デバッグ用 use Data::Dumper; print Dumper( @array ); perl -d のxコマンド相当 データの永続化 use Storable; sto…

10分以上アクセスのないセッションを削除する

PHP

cron に以下を設定する。 5,15,25,35,45,55 * * * * cd /var/lib/php/session/; find -amin +10 -exec rm -f {} \;find のexec は、「;」で終わる必要あり。 find の「{}」には、find でマッチしたファイル名が入る。 shellが、; を理解できるように、「\;」…

innodb テーブルを1テーブル1ファイルにするには

「mysqld」 セクションに「innodb_file_per_table」オプションを記述する。