タグ

Perlに関するeiji8pouのブックマーク (245)

  • tr - 5部 関数リファレンス - [SMART]

    tr///演算子の使い方 # 小文字に統一 $str =~ tr/A-Z/a-z/; trは変数を展開しません。変数を使いたい場合には、evalを使います。 eval "tr/$search/$replace/, 1" or die $@; c オプション(Complement) cオプションは、検索文字列以外の文字を検索します。つまり、最初に指定する文字列に含まれていない文字を置換文字列の文字に変換します。 # 0から9以外の文字列を*に変換 tr/[0-9]/*/c s オプション(Squeeze) sオプションは、検索文字列の文字が連続して複数個見つかった場合、それらを1文字に置き換えます。 # 複数の「A」を1つの「A」に変換 tr/A/A/s d オプション(Delete) dオプションは、検索文字列の文字のうち置換文字列には含まれない文字をすべて削除します。 tr///演算子の

    eiji8pou
    eiji8pou 2007/10/07
    基本だからこそ忘れないように
  • QRコード CGI & PHP scripts - QRcode generator for perl & php

    内容 GDを使用してQR codeのpngまたはjpegイメージを出力する、または いくつかの画像を配置してホームページ上でQR codeを表示する perl CGIプログラム qr_img.cgi およびGDを使用してpngまたはjpegイメージを出力するPHPスクリプト qr_img.php があります。 qr_img.cgi はコマンドライン上からも実行できます。 動作確認環境 Linux2.4.18(x86) Apache 1.3.27 Perl 5.6.1 GD 1.8.4 GD.pm 1.33 PHP-4.3.0 qr_img.cgiの実行にはperl5,GDおよびGD.pmが必要です。 qr_img.phpの実行にはPHPおよびGDが必要です。 表示できるQRコードは model2 の version 1~40 でいくつかの機能は実装されていません。 詳しくは添付ドキュメント

  • JANコード見納め? | ぱそこんライフ

    日常のパソコンライフを書いています。略して「ぱそライ」。初心者↑↑中級者↓↓な内容で目にとまったものをピックアップ! by lankyboy 世界の商品コードが標準化へ――「2005サンライズ」の影響 (1/2) - ITmedia Enterprise UPCとEANが来年1月を持ってGTIN(グローバル・トレード・アイテム・ナンバー)に統合される模様。 日の流通バーコードはご存知の通り、EANを拡張したJAN。輸送用のコードとしてはCODE39とか使ってると思いますけど、コンビニでぴぴってのはJANということで、この話業界内では前からでてたんですよねぇ・・・。きっと。 GTINは14ケタの商品コード体系であり、従来のUPCやEANコードを包含するものである。したがって、既存の12ケタのUPCバーコードや13ケタのEAN/JANバーコードが読めなくなるわけではない。 GTINの特徴は頭

    JANコード見納め? | ぱそこんライフ
  • ひとり開発ブログ | » ロボット投稿型スパムをさくっと防ぐ超簡単な方法

    なんと、このideamiというしょぼいサイトにも海外からのロボット投稿型スパムが来るようになってしまいました。悲しい。 何とか対策をしようと思っていたところ、dotliveのオカダ君がいい方法を教えてくれました。(Thanks!) やり方は簡単。 ロボットスパムは、htmlのソースからformを見つけ、そこにデータを自動的に入れて投稿しているわけです。その投稿の仕方は単純で、どうやらnameでよく使われるような単語を見つけて、それに投稿しているぽい。 たとえば、「name」は名前、「mail」はメール欄、「url」はurl入力欄、みたいな感じです。 今回の対策では、これを逆手に取ります。つまり、偽物のフォームを作り、それに入力があるもの=ロボットによる投稿、と見なし、投稿させないというものです。 偽物のフォームを作り style=”display: none” しておいて、ユーザーには見

  • not found

    盾集域名停放是全球优质行业导航备案网站领导者 为中小企业提供数字化、快速化、轻量化、精准化的网站链接服务 dns1.dopa.com,dns2.dopa.com 版权所有 站内容未经书面许可,禁止一切形式的转载 © CopyRight 2023 盾集域名停放click.com.cn    浙ICP备20018420号-2 杭州盾集网络有限公司

  • グリモン初挑戦。 - Myrmecoleon in Paradoxical Library. はてな新館

    宮崎大学附属図書館の試みが図書館界隈でちょっと話題になっている。 宮崎大学附属図書館、OPACにJuNii+をマッシュアップしてリポジトリコンテンツをリコメンドする試み | カレントアウェアネス・ポータル 何をやってるかというのを業界外の人にもわかるように説明すると, ある図書館でもってるを探す検索エンジンみたいのがある(OPACという) 大学の先生方の論文とか全然論文でないものとかのデータをとりあえずうpして,そのリストを簡単に引っこ抜いて検索したりできるようにした機関リポジトリというなんかよくわからないものがある*1。 こういう国内の機関リポジトリでもってる論文とかのリストを集めてまとめて検索できるようにしたJuNii+というサービスが試験公開されてる。*2 宮崎大のOPACで,検索したのタイトルからJuNii+を検索して論文等を表示させるマッシュアップを公開した。 って感じ。まあ

    グリモン初挑戦。 - Myrmecoleon in Paradoxical Library. はてな新館
  • Class::DBIでobejctやreferenceを保存 : blog.nomadscafe.jp

    Class::DBIでobejctやreferenceを保存 「Class::DBI で疑似的カラム」をちょっと機能強化で書いたモジュールをもとにClass::DBI でobejctやreferenceをシームレスに保存できるプラグインを書いてみた。 使い方 package My::Film; use base 'Class::DBI'; use Class::DBI::Plugin::SerializeColumn; __PACKAGE__->columns(All => qw/id title props/); __PACKAGE__->serialize_column('props'); などとクラスを書いて、 My::Film->create({ id=>1, title=>'四月物語', props =>{year=> 1998,director=>'岩井俊二'} }); とでき

  • Amazon S3 をバックアップストレージとして利用する

    Amazon Simple Storage Service(A3)をバックアップストレージとして使うときのメモです。 ここでは自分のみがアクセスする目的と考え、ファイルを公開して配布する目的では必要となるであろうログの取得についてなどは省きます。 利点 単価がとにかく安い(1か月あたりの料金:転送量が$0.20/GB、データ領域が$0.15/GB) Amazonインフラなので信頼性がある 欠点 APIでの提供なので何らかのツールが必要となる そんなに速くない ちょこちょこ使うストレージとしてみると使いづらい ファイル操作は基GET/PUT/DELETEしか用意されていない 移動・名前変更を行おうとするとGET→名前を変えてPUT→DELETEとなるのでムダがある(時間的にも金銭的にも) バケット(bucket) ストレージの領域の事。フォルダよりドライブに近い概念です。 自由に作成できま

  • Perlメモ/CGIモジュール - Walrus, Digit.

    フォームデコードなどの機能を持つ、CGI作成者のためのPerlモジュール。 CGIモジュールはHTMLやフォームの生成、フォームデータのパース、Cookieの取得と出力などの機能を持つモジュールです。 いささか重厚長大のきらいはありますが、CGI::Liteモジュールと異なりCGIモジュールは多くの環境でデフォルトインストールされていることなど、CGIモジュールを選ぶべき理由も多くあります。 CGIモジュールには多くのドキュメントが付属しています。 この内いくつかは、Perldoc.jpで和訳した文書を見ることができます。 http://perldoc.jp/docs/modules/ IBMのサイトには「便利なCGIスクリプト作成のためのヒント~CGI.pmモジュールを綿密に検討する」という文書があります。 いささか古いのですが、CGIモジュールを使ったファイルアップローダを検討するのに

  • 一般ユーザ環境におけるCPANモジュールの使い方 - iandeth.

    先週公開した、じゃらんWebサービスを使ったサンプルサイト「シンプル宿検索」にて、perlのソースコードも一緒に公開してみたのですが、さっそく興味を持ってくれた方から問い合わせを頂きました。 cgiを実行させようとしたら以下のエラーが出てしまいました: Can't locate Template.pm in @INC (中略) at search.cgi line 5 ... Template.pm モジュールがインストールされてないよ!って怒られています。あー、コード公開する際は必要なCPANモジュールも一緒に添付しといてあげたほうが親切なのかな?いやでもそれ面倒くさいし無理あるなあ・・・。 Webでキーワード "CPAN" を検索すると出てくるCPANの使い方系ページの多くは、そのサーバの root 権限を持っている前提で、サーバの共通ライブラリ下にCPANモジュールを追加する方法を紹

  • MODULE.JP - 日本語に絡むUnicodeブロックとスクリプト(正規表現)

    といった感じ。ちなみにjava.util.regexとPerlのUnicodeブロックは接頭子Inを使うが、.NETの場合は接頭子Isを使う、という差異があります。 Unicodeスクリプトとブロックの違いがビミョーに見えるけど、ブロックがコードブロックをゴリッと指定したものに対して、スクリプトは特定言語に関係する文字の種類を直接指定するものなのでブロックよりも断定的、って感じで見れば良かなと。ちなみにUnicode関連のドキュメントによるとUnicodeプロパティとスクリプトで日語の文章を表そうとすると m/(?:(?:\p{Hiragana}|\p{Katakana}|\p{Han}|\p{Latin}|\p{Common}) (?:\p{Inherited}|\p{Me}|\p{Mn})?)+/x; こんな感じになるそうな。実際流通している文章はこれより多様なので現実とは微妙に乖離

  • 日本語に対する便利な正規表現 - 備忘録。

    ひらがな \p{Hiragana} カタカナ \p{Katakana} 漢字 \p{Han}

    日本語に対する便利な正規表現 - 備忘録。
    eiji8pou
    eiji8pou 2007/07/03
    ……こんなのあったのか? いつからだろう。
  • 502 Bad Gateway nginx openresty 52.68.0.227

  • 404 Blog Not Found:怠訳 - 怠惰を役立てる10の方法

    2007年06月17日00:15 カテゴリ翻訳/紹介 怠訳 - 怠惰を役立てる10の方法 Perl Mongerとしては見過ごせないタイトルなので。 10 Ways to Make Laziness Work for You 完訳するには私はあまりにlazyなので、きちんと読みたい方は上をクリック。 一番かしこいい連中は、一番ものぐさな連中 - often the smartest people are the laziest ones. 連中はいつも仕事から逃れようとしているので、結果として一番優れた発明をしたりする。コンピューターとか、電子レンジとか、自動車とか、アンチョコとか。 仕事のきつさを和らげる - Make not doing it harder. ものぐさな奴はきつい仕事がきらい。ということは、もっときつい仕事を見せると、それを避けるためにより軽い仕事を片付けたりする。例え

    404 Blog Not Found:怠訳 - 怠惰を役立てる10の方法
  • ISBNの処理モロモロ - eiji8pou's diary

    ISBNモロモロ - 永字八法の続き。 http://www.eiji8pou.pics/perl/scripts/isbn.cgiを作りました。 出版社コードないしISBNコードを入れると、その出版社情報を取得するCGIです。 ちょっと便利なのが、これまで呼び出された出版者情報を覚えており、それを一覧表示する点です。 下のリストで確認し、それでもわからなければ検索すると言う使い方ができます。 ……まあ、あんまり使い道ないんですけどね。

    ISBNの処理モロモロ - eiji8pou's diary
    eiji8pou
    eiji8pou 2007/06/07
    自己言及
  • ISBN10, EAN13 相互変換Webアプリ - eiji8pou's diary

    http://www.eiji8pou.pics/perl/scripts/ean2isbn.cgi 探せばどこかにありそうなものだが、探すより作る方が気分的に楽だった。 Webにおくことに意味がある。多分。 スクリプト #!/usr/local/bin/perl use strict; use CGI::Carp qw(fatalsToBrowser); use CGI; use Business::ISBN qw(ean_to_isbn); use Business::Barcode::EAN13 qw(check_digit); my $q = CGI->new; print $q->header; print $q->start_html(-title=>'EAN and ISBN10 converter'); print $q->h1('EAN to ISBN10'); prin

    ISBN10, EAN13 相互変換Webアプリ - eiji8pou's diary
    eiji8pou
    eiji8pou 2007/06/07
    自己言及
  • hide-k.net#blog: いつでもどこでも、すぐに Class::DBI を使いたい

    仕事でレンタルサーバー上でCGIを書く羽目になったのですが、root権限はおろかシェルも使えない環境なのでCatalystにどっぷりつかっていたボクとしては面倒くさくて気が狂いそうです。 特にDB周り。 DBI直たたきなんて非人間的な作業をやっているとバグつぶしだけで頭がおかしくなりそうです。 で、なんとかClass::DBIだけでも使えないか調べて見ました。 CDBIが依存しているクラスでXSを使っているのはversionとCloneだけです。 それならある程度環境が整っているレンタルサーバーならなんとかなるだろうってことで調べて見ると、都合のいいことにversionは--perl_onlyオプション付きでMakefile.PLすればPure Perlなクラスを作成してくれるし、CloneはClone::PPなるPure PerlなCloneクラスがありました。 で、やってみました。

  • 2007-04-18

    韓国】ソウル新聞・韓国日報、ヴァージニア工大銃乱射事件アメリカを風刺する漫画を掲載 ★2 [04/18] http://news21.2ch.net/test/read.cgi/news4plus/1176853558/ より 176 :<丶`∀´>(´・ω・`)(`ハ´  )さん :2007/04/18(水) 09:10:15 ID:mjEJzjDa そもそも、これほど痛ましい事件をこんな風に皮肉るセンスが、人としてありえない。 韓国人が犯人とかそういう事関係なく、気が狂ってるとしか言い様がない。 194 :<丶`∀´>(´・ω・`)(`ハ´  )さん :2007/04/18(水) 09:11:48 ID:q9DihNiN >>176 日で地震が起きれば天罰ニダ! 911のときも当然のごとく喜んでたチョンだぜ? 224 :<丶`∀´>(´・ω・`)(`ハ´  )さん :2007/

    2007-04-18
  • not found

    盾集域名停放是全球优质行业导航备案网站领导者 为中小企业提供数字化、快速化、轻量化、精准化的网站链接服务 dns1.dopa.com,dns2.dopa.com 版权所有 站内容未经书面许可,禁止一切形式的转载 © CopyRight 2023 盾集域名停放click.com.cn    浙ICP备20018420号-2 杭州盾集网络有限公司

  • perl - 勝手に添削断念 - NNIPF : 404 Blog Not Found

    2007年04月15日07:30 カテゴリLightweight Languages perl - 勝手に添削断念 - NNIPF 「はてなブックマーク - タグ perl」で以下を発見して、SPAMとの戦いに日々うんざりしている私は期待に胸を踊らせたのですが、代わりに心臓が踊ってしまいました。 http://vrl.sys.wakayama-u.ac.jp/~twada/NNIPF.html NNIPFでは,我々が長年蓄積した100万通以上の大量のSPAMデータを詳細に解析した結果,最も有効であると思われる「送信者の情報」を特徴として利用しております.下記の二つを,指定されたURLからダウンロードして,下記の指定された名前でNNIPFのディレクトリに保存してください. -rw-r--r-- jcode.pl-2.13 http://www.srekcah.org/jcode/jcode.

    perl - 勝手に添削断念 - NNIPF : 404 Blog Not Found