Monthly Archives: 4月 2010

You are browsing the site archives by month.
194月 2010

perl　リファレンス判定

⋅ Leave a Comment

ref関数は、引数が リファレンスの場合は、リファレンスが参照する型（真）を返します。

それ以外の場合は、空文字列（偽）を返します。

返す型には、以下のものがあります。

尚、blessされたものであれば、型でなくパッケージ名（クラス名）を返します。

ref関数の使い方

if (ref($para) eq "ARRAY") {
    @wk = @$para; # $paraは配列のリファレンスです
}
134月 2010

ベーシック認証で特定のIPアドレスには認証しない設定

⋅ Leave a Comment

ベーシック認証で特定のIPアドレスには認証をかけて、あるIPにはベーシック認証を出さないという設定があるのを

最近しったのでメモ。

htaccessに

AuthType Basic
AuthDBUserFile /etc/test
AuthName "Please input your coins's Account & Password"
Require valid-user

Satisfy Any

Order Allow,Deny
Allow from 161.1.1.1
Allow from 151.1.1.1


赤字の部分がおまじない。


これでAllow　fromで指定したIPアドレスにはベーシック認証をださないらしい。


まだテストはしていないからどうなるかはわからないけど・・・
034月 2010

linux cpanの設定

⋅ Leave a Comment

centos(Linux)にcpanでperlのモジュールを入れた際のメモ。

「perl -MCPAN -e shell」のコマンドを打った後に

「install モジュール名」

としてもうまくいかなかったので、

cpan>　o conf　urllist　push　追加したいurl

でcpanの設定のurllistに追加したら、なんかうまくいった。

よくわかんないけどまいっか…

追加したいurl一覧