タグ

2007年7月2日のブックマーク (3件)

  • 努力、忍耐、謙遜

    Diligence,Patience,and Humility 努力、忍耐、謙遜 Larry Wall ラリー・ウォール Translation by Akira Kurahone 我われのPerlコミュニティでは、格言を好んで使う。そういった格言の一つに、「物事のやり方は一つではない」と言うのがある。この格言はPerlコミュニティの真理である。また、Perlそのものにも当てはまる。そして、書の各章で明らかにされるように、オープンソースコミュニティにも当てはまる。私は、ここでオープンソースの効用のすべてを語るつもりはない。それは、英語が役に立つ理由を説明しようとするようなものである。ただ、Perlの現状と今後についてなら多少は語れると思う。 こんな格言もある。「プログラミングの三大徳目は、無精、短気、傲慢である」。Perlの偉大なプログラマたちは、それらの徳目を信奉している。オープンソー

    likk
    likk 2007/07/02
    Larry Wall
  • Tie::String - みずぴー日記

    30分プログラム、その71。 Perlだと、文字列はスカラーなので配列のようにアクセスできない。 my $msg = 'Hello,world!!'; print substr($msg,0,1); # <- 0番目の要素を取得 print $msg[0]; # <- これがやりたい というわけで、これをタイ変数で実現してみる。 tie my @string,'StringArray','ABCD'; print "$string[0]\n"; use strict; use warnings; package StringArray; use base 'Tie::Array'; # 初期化 sub TIEARRAY{ my ($class,$string) = @_; bless \$string,$class; } # 文字の取得 sub FETCH{ my ($string,$in

    Tie::String - みずぴー日記
    likk
    likk 2007/07/02
    Tie::String スカラーを配列のようにアクセス
  • 社内プロキシ - Think Not Forever

    数年前から、社内のプロキシにフィルタがかかるようになっている。 アダルトサイトやギャンブル系のサイト、掲示板などがその対象である。具体的には2chもそうだし、なんとGoogleのキャッシュもひっかかってしまう。 実際問題調べモノをしていると、2chGoogleのキャッシュは重要な情報源だったりするし、掲示板でのやりとりの中でほしい情報があるかもしれない。 そこで自前サーバーに URL / User-Agent / Referer を入力する(フレーム上部) 入力されたページを取得する 取得したページを表示する(フレーム下部) というページを作った。昔は勉強のためjavaで作って、PHPが騒がれだしたころはPHPでつくって、今回は Perl で作った。 #!/usr/bin/perl use warnings; use strict; use CGI; use CGI::Carp qw/

    社内プロキシ - Think Not Forever
    likk
    likk 2007/07/02
    Web-proxy