Perl日記

日々の知ったことのメモなどです。Perlは最近やってないです。

2010-07-01から1ヶ月間の記事一覧

PHPでList::MoreUtilsのやつ

何番煎じかわからないけど、 Perlのuniq()とmesh()をPHPで考えてみた。

機種依存文字の文字コード変換

Windowsのメモ帳で保存したテキストファイルの中に「①」があって、それをPerlで読み込んで以下のようにUTF-8に変換したら化けていた。 use Encode; open my $fh, '<', './memo.txt' or die; binmode $fh, q{:encoding(:sjis)}; print encode('utf8' => $_) f…

PerlerのためのPHP3

前までの2回でふと思ったこと。 sort()で破壊させないには a,b,c,d,ePHPのsort()はPerlと違ってソーティングされた配列が返ってこない。 直接直截。 注意: ソート関数は、すべて配列自身を直接変更します。 ソートした配列を新しく作って返すわけではありま…

PerlerのためのPHP2

続き。 初めてのPHP5作者: David Sklar,桑村潤,廣川類出版社/メーカー: オライリージャパン発売日: 2005/10/27メディア: 単行本購入: 6人 クリック: 54回この商品を含むブログ (41件) を見る そういえばtrueとfalseが抜けていた。 つーか「===」って何よ。 …

PerlerのためのPHP1

たぶんPHPを使わなければならないようになると思うので、今のうちから勉強。 ああCatalystでもっと遊びたい。 とりあえずこれを買った。 初めてのPHP5作者: David Sklar,桑村潤,廣川類出版社/メーカー: オライリージャパン発売日: 2005/10/27メディア: 単行…

ラベルでつまる

いまテストをこんな風に書いている。 GET_COOKIES : { local $ENV{HTTP_COOKIE}; local $ENV{COOKIE}; ... my %result = get_cookies(); ... } SET_COOKIES : { stdout_is { set_cookies( ... ); } } テストするサブルーチンの名前をそのままテストブロック…

Catalyst::Plugin::Authentication

を使っている。 に書かれているままをとりあえず使ってみているのだけれど、中身見てないから原理がさっぱりわからない。 どうやって「ログイン済」「ログアウト」を判断しているんだろう。 いっしょに Session Session::Store::FastMmap Session::State::Co…

forwardとdetachとvisitとgo

まだまだCatalyst。 Controllerクラスで、$c->forward()と$c->detach()は、制御が帰ってくるかどうか(返ってくるかどうか)の違いだと覚えていた。 まあそれはあっているんだけれど、他にも違いがあった。 Controller/Login.pm sub index :Path :Args(0) { my…

Catalyst完全入門読書中

PerlフレームワークCatalyst完全入門作者: 山田祥寛出版社/メーカー: インプレスジャパン発売日: 2010/05/20メディア: 単行本(ソフトカバー)購入: 8人 クリック: 214回この商品を含むブログ (18件) を見る まだ途中。 ただ印象としては、Catalystの使い方…

3306ポートをとじる

いまサーバを借りてCatalystとMySQLをいれていろいろ遊んでいるのだけれど、MySQLのポートってどうなってるんだろうと思い立って確かめてみた。 # netstat -a tcp 0 0 *:mysql *:* LISTEN空いてた。 # grep mysql /etc/services mysql 3306/tcp # MySQL mysq…