タグ

Perlに関するcho45のブックマーク (74)

  • perl - use utf8; #って何だ? : 404 Blog Not Found

    2009年06月15日07:00 カテゴリLightweight Languages perl - use utf8; #って何だ? id:otsuneに建設予定フラグがたてられていたので。 冬通りに消え行く制服ガールは、夢物語にリアルを求めない。 - subtech Perl の utf8 関係が未だ全く理解できない。わからないことがわからないので整理 use utf8はいつフラグをたてるか use utf8 しててもフラグたたないことがある…… これは、以下の実例を見ていただくのが一番よいだろう。 #!/usr/bin/perl use strict; use warnings; use utf8 (); sub check_flag{ my $str = shift; print qq("$str" ), utf8::is_utf8($str) ? 'is' : 'IS NOT',

    perl - use utf8; #って何だ? : 404 Blog Not Found
    cho45
    cho45 2009/06/15
    「dankogaiは全てASCII領域にあるため、立てた場合も立てない場合も文字列処理の結果が同じになるからだ。」
  • YappoLogs: Hash::Merge 活用術

    Hash::Merge 活用術 「全裸は違法だということを言われた。ええええ、そんな法律があるのか?Debugはできるようになるかもしれない。」と思っておセンチなyappoです。 hashを簡単にmergeするCPAN moduleとしてHash::Mergeがあるのは有名ですが、デフォルトだと色々頑張ってマージしちゃうので、例えばHTTP::Engine::Middlewareの使いたいMiddlewareをARRAY refで書いちゃったりして、base.yamlとproduction.yamlでmergeした時に、以下のような混ざりかたでとんでも無い目にあいます。 use strict; use warnings; use YAML; use Hash::Merge; my $base = { Middlewares => [ { module => 'HTTPSession', c

    cho45
    cho45 2009/05/28
  • TPF-J構想 - D-6 [相変わらず根無し]

    TPF-J構想 昨日あったYAPCの打ち上げでぶちあげてしまったので、ここに1年以内のTPF-Jを発足を目標とする旨、明言しておく。 TPF-JはThe Perl Foundation Japanとして、Perlの普及活動および、普及活動を行う任意の個人・団体に人的、資金的な援助を行う目的で活動する。 主な活動内容としては、公共Perlサービス?のようなもののスポンサーや、その内容についての認定、あとは資金さえあればプロジェクト等への補助金交付。たとえば先日立ち上がったperl-users.jpにしても(彼らが実際に賛同してくれるかどうかは別として)、TPF-Jのような団体のお墨付き?や、資金的援助を受けられる事となれば活動内容が充実するし、YAPCのようなイベントにも、TPF-Jは1団体としてあくまで公共サービス的に参加できる。また、Shibuya.pmを筆頭としてPerl Monger

    cho45
    cho45 2008/11/30
  • perl - LWP::UserAgentで進捗表示しつつダウンロード : 404 Blog Not Found

    2008年11月21日00:15 カテゴリLightweight Languages perl - LWP::UserAgentで進捗表示しつつダウンロード 後のデザートとして手頃なサイズの問題だったので。 Ruby Net::HTTP で進捗表示しつつダウンロードのメモ - 冬通りに消え行く制服ガールは、夢物語にリアルを求めない。 - subtech #!/usr/local/bin/perl # # $Id: lwp-callback-example.pl,v 0.1 2008/11/20 15:16:48 dankogai Exp dankogai $ # use strict; use warnings; use LWP::UserAgent; use File::Basename; my $uri = shift || die "$0 http://example.com/bi

    perl - LWP::UserAgentで進捗表示しつつダウンロード : 404 Blog Not Found
    cho45
    cho45 2008/11/21
  • Perl6-Junction-1.60000

    The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

    Perl6-Junction-1.60000
  • [perl]内部的に数値か文字かを判別する

    どうーでもいいーですよー。 どうでもいい話ー、聞いてください。 Perlというやつは一応内部的には数値か文字列かをちゃんと分けて変数の管理をしているのです。 でわ、現在ある変数が内部的に数値なのか?内部的に文字列なのか?判別しようと思ったらどうしますか? こうしてみます。 my @data = ( 100, # 100は内部的に数値 '200' # 200は内部的に文字 ); foreach my $d ( @data ) { if( ($d ^ $d) eq '0' ){ print $d . " = It's numeric\n"; } else { print $d . " = It's string\n"; } } 同じ変数同士を排他的論理和(^)すると、その変数が数値の場合は0になり、その変数が文字列の場合は空文字になるのです。 なぜかって?そりゃ同じ値同士で排他的論理和したら必

    [perl]内部的に数値か文字かを判別する
    cho45
    cho45 2008/08/14
    2get
  • perl - B::Deparse : 404 Blog Not Found

    2007年02月11日13:45 カテゴリLightweight Languages perl - B::Deparse 尻馬乗るべし、ということでB::Deparseの紹介。 いやなブログ - スクリプト言語用のデバッガの使い方 - Ruby, Python, Perl スクリプト言語用の CUIのデバッガの使い方を簡単にまとめました。対象言語は Ruby, Python, Perl です。実は私も、デバッガーはperl -de1ぐらいしか使っていない(perl -de1は非常によく使うので、Terminal.appのウィンドウの一つがそれ専用になっている。スクリプト言語のインタラクティブな利用法に関しては以前「404 Blog Not Found:LL Intaractive」にまとめたのでそちらをご覧頂くとして、ここではなぜスクリプト言語では滅多にデバッガーを使わないかをおさらいした

    perl - B::Deparse : 404 Blog Not Found
    cho45
    cho45 2008/08/14
  • Perl の正規表現リテラル中の変数展開を読む

    Perl の正規表現リテラル中の変数展開では、文法上、 解釈にあいまいさが生じることがあります。 この文章では、Perl インタプリタのソースコードから、 実装上でどのようにあいまいさが解決されるのかを説明します。 更新履歴 2008-06-05: 公開 Perl の判断 Perl では、文字列リテラルや正規表現リテラルの中で変数展開を行えます。 use Test::More tests => 2; my $name = 'Alice'; $_ = "My name is $name"; is($_, 'My name is Alice', '$name として Alice が展開される'); s/$name/Bob/g; is($_, 'My name is Bob', 'Alice が Bob に置き換えられる'); しかし、正規表現リテラルのなかで配列の要素を展開する際には、 [ 〜

    cho45
    cho45 2008/08/09
  • ゆの in Perl - Bulknews::Subtech - subtech

    はてなグループの終了日を2020年1月31日(金)に決定しました 以下のエントリの通り、今年末を目処にはてなグループを終了予定である旨をお知らせしておりました。 2019年末を目処に、はてなグループの提供を終了する予定です - はてなグループ日記 このたび、正式に終了日を決定いたしましたので、以下の通りご確認ください。 終了日: 2020年1月31日(金) エクスポート希望申請期限:2020年1月31日(金) 終了日以降は、はてなグループの閲覧および投稿は行えません。日記のエクスポートが必要な方は以下の記事にしたがって手続きをしてください。 はてなグループに投稿された日記データのエクスポートについて - はてなグループ日記 ご利用のみなさまにはご迷惑をおかけいたしますが、どうぞよろしくお願いいたします。 2020-06-25 追記 はてなグループ日記のエクスポートデータは2020年2月28

    ゆの in Perl - Bulknews::Subtech - subtech
  • use Safe; # XS知らなくても大丈夫! : 404 Blog Not Found

    2008年06月30日16:45 カテゴリLightweight Languages use Safe; # XS知らなくても大丈夫! さすがにこの目的のためだけにXS Hackというのは、ハエ退治にパトリオットミサイル撃つようなものなので、キンチョールも紹介しておきたく。 PL_check hack - daily dayflower ゴール #!/usr/bin/perl eval 'print "Hello ' . $ARGV[0] . '!\n"'; とか危険ですよねー*1。こんな機能があるなんてけしからん。ですので,eval の実行を抑制するモジュールを書いてみました。 そのためには、Safeモジュールを使います。Perl 5.02からCOREに入っている由緒あるモジュールです。Malcolm Beattie がBのフレームワークを作った理由の一つが、これを可能にすることでした。

    use Safe; # XS知らなくても大丈夫! : 404 Blog Not Found
    cho45
    cho45 2008/07/01
  • 図解: Perl と Unicode 文字列 - daily dayflower

    id:tomi-ru さんが [http://e8y.net/mag/015-encode/:title] というとてもプラクティカルな [http://search.cpan.org/perldoc?Encode:title=Encode] 入門をお書きになったので,わたしも違う切り口で書いてみたくなりました。 いちおうの基礎(読み飛ばし可) 文字セット, キャラクタセット, 文字集合, 文字集合 - Wikipedia エンコーディング, 符号化方式, 文字符号化方式 - Wikipedia この2つは異なります。とくに知らなくても下記の文書を読むことはできますが,理解しているとためになります。くわしく知りたい人は自習してください。 文字セットの例 Unicode JIS X 0208 ひらがなとかカタカナとか漢字とか ASCII 文字 エンコーディングの例 UTF-8 ISO-202

    図解: Perl と Unicode 文字列 - daily dayflower
    cho45
    cho45 2008/06/20
  • 依存モジュールの指定漏れを防ぐ方法 - 名称未設定♥ - subtech

    はてなグループの終了日を2020年1月31日(金)に決定しました 以下のエントリの通り、今年末を目処にはてなグループを終了予定である旨をお知らせしておりました。 2019年末を目処に、はてなグループの提供を終了する予定です - はてなグループ日記 このたび、正式に終了日を決定いたしましたので、以下の通りご確認ください。 終了日: 2020年1月31日(金) エクスポート希望申請期限:2020年1月31日(金) 終了日以降は、はてなグループの閲覧および投稿は行えません。日記のエクスポートが必要な方は以下の記事にしたがって手続きをしてください。 はてなグループに投稿された日記データのエクスポートについて - はてなグループ日記 ご利用のみなさまにはご迷惑をおかけいたしますが、どうぞよろしくお願いいたします。 2020-06-25 追記 はてなグループ日記のエクスポートデータは2020年2月28

    依存モジュールの指定漏れを防ぐ方法 - 名称未設定♥ - subtech
  • Perl-users.jp - 日本のPerlユーザのためのハブサイト

    Perl Mongers Perl Mongers とは、日各地に存在する、Perl ユーザーのコミュニティのことです。各種イベントが行われていますので、是非参加してみましょう。 Shibuya.pm Fukuoka.pm Kansai.pm (@kansaipm) Yokohama.pm (@yokohamapm) Hokkaido.pm (@hokkaidopm) Nagoya.pm (@nagoyapm) Kushiro.pm (@kushiropm) Kyoto.pm (@kyotopm) Kamakura.pm Niigata.pm (@niigatapm) Sendai.pm (@sendaipm) Tokyo.pm Hachioji.pm (@hachiojipm) Chiba.pm (@chibapm) Yomitan.pm (@yomitanpm) Machida.pm

    cho45
    cho45 2008/05/20
  • ソースコードのダウンロードを開始: Blog Hacks - プロが教えるテクニック & ツール100選

    Blog Hacks - プロが教えるテクニック & ツール100選 書籍 "Blog Hacks" (オライリー・ジャパン: ISBN 4873111749) のサポート用 Blog です。 « レビューなどお寄せください | メイン | Ben Trott 氏からメール » 2004年08月17日 ソースコードのダウンロードを開始 お待たせしました。ソースコードサンプルのダウンロードができるようになりました。 bloghacks.zip (170k) zip 形式でアーカイブされており、各 Hack ごとのフォルダに分かれています。 特に明記のない限り、各ソースコードサンプルの著作権は各 Hack の著者に属し、Perl と同一のライセンス (Artistic ライセンスまたは GPL2 ライセンス) の元でリリースされます。 投稿者 miyagawa : 2004年08月17日 1

    cho45
    cho45 2008/05/09
  • (Ab)?using Class::C3 - YAPC::Asia 2007 Tokyo Sessions

    C3アルゴリズムはDBIx::Class、PythonPerl6でも使われているMRO (Method Resolution Order)を決定するための仕組みです。 Class::C3はどんな挙動をするのか、SUPERやNEXT.pmとの違いはなんなのかから、簡単にClass::C3を使ってコンポーネント化されたフレームワークを作る事に関して。

    cho45
    cho45 2008/04/17
    あとで
  • https://labs.cybozu.co.jp/blog/kazuho/archives/2008/04/q4m_crawler.php

  • qpsmtpd - Develooper LLC

    qpsmtpd is a flexible smtpd daemon written in Perl. Apart from the core SMTP features, all functionality is implemented in small "extension plugins" using the easy to use object oriented plugin API. qpsmtpd was originally written as a drop-in qmail-smtpd replacement, but now it also includes smtp forward, postfix, exim and maildir "backends". Articles and Documentation The qpsmtpd wiki Using Qpsmt

  • Elementary, ... メールでルー語変換 powered by qpsmtpd

    かなり前になりますが、miyagawa さんが Plagger の開発始めたときのプラグイン機構の話で例にあげていた qpsmtpd、ずっと気になっていたのですがやっとさわってみました。 これを使って、メールでルー語変換というのを作ってみました。 m@lou5.jp にメールを送ると、件名や文がルー語変換されて戻ります。自分で楽しむなり、戻ってきたルー語メールを転送するなり、ご自由にお試しください。ルー語変換は携帯から使いたいという声が多かったのですが、これで携帯でもいけるかな、と。 携帯アドレスの場合絵文字を混ぜて返すとか、PC の場合 HTML メールで返したりとか、いろいろ夢はひろがりますが、それはまた時間取れたときやります。。 qpsmtpd 日語の言及が少ないのでちょっと書いておくと、全部がプラグインでできた Perl による SMTP サーバー。スパム対策に強い smtpd

    Elementary, ... メールでルー語変換 powered by qpsmtpd
  • DateTime::Format::Natural

    NAME DateTime::Format::Natural - Parse informal natural language date/time strings SYNOPSIS use DateTime::Format::Natural; $parser = DateTime::Format::Natural->new; $dt = $parser->parse_datetime($date_string); @dt = $parser->parse_datetime_duration($date_string); $date_string = $parser->extract_datetime($extract_string); @date_strings = $parser->extract_datetime($extract_string); if ($parser->succ

    DateTime::Format::Natural
  • Google Code Archive - Long-term storage for Google Code Project Hosting.

    Code Archive Skip to content Google About Google Privacy Terms