perl5i について - tokuhirom's blog
最近、ことあるごとに perl5i がヨイヨーといっている。 perl5i は、perl5 + i ということなのであって、perl6 にたいする洒落なのであって、かつこの i とはいうまでもなく sqrt(-1) のことである。 perl5 は、CPAN にあがっているモジュール郡を利用することにより非常に協力な言語となっているが、一方で初心者はモジュールの選定などがまずもってむずかしいという難点があり、「電池はいってます」という正直意味がわかりづらくて日本語の標語としてはいかがなものかとおもうような標語をかかげる言語にくらべて初心者がとっつきづらいという問題がある。 そこで、perl5i では、perl5i のメンテナがえらんだモジュールが自動的にロードされるような仕組みを提供しているため、非常にとっつきやすくなっている。 use perl5i::2; とかくだけで、かなりいろいろなモ
Perl 非同期プログラミング
1. 非同期プログラミング with Perl 2010/08/07 Japan Perl Association 代表理事 株式会社ライブドア 牧 大 輔 (@lestrrat) 3. 普通の書き方 use strict; use LWP::UserAgent; my @urls = qw( http://www.livedoor.com/ http://www.dena.jp/ http://mixi.jp/ http://www.gaiax.co.jp/ ); my $ua = LWP::UserAgent->new(); foreach my $url (@urls) { my $res = $ua->get( $url ); ... }
エンジニアインタビュー 山口 徹 | エンジニア特集｜株式会社ディー・エヌ・エー 採用サイト
ソーシャルメディア事業本部プラットフォーム統括部 システムグループ 山口 徹 サイボウズ・ラボというIT技術研究組織からDeNAに転職。OpenIDなどサービス連携・認証技術の専門家であり、JPA（日本Perl協会）の理事も務め、Perl技術者のコミュニティを中心にZIGOROuのハンドルネームでも知られる。 研究職を離れ、モバゲータウンという国内最大級の実サービスに関わってから約1年。モバゲーのオープン化を達成し、社内ナレッジの底上げに努め、技術情報の対外的なアウトプットにも尽力している。 Webでのサービス開発を求めて転職 御存知の通りサイボウズ・ラボは日本でもトップクラスのハッカーが集まる会社で、技術的な満足度は高く研究も非常に楽しかったんですが、いかんせんラボ発のウェブサービスは新しい技術や仮説が先にあり、その試験環境的な意味合いが強く、ビジネス的に当った事が無いんですね。
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」にまとめたのでそちらをご覧頂くとして、ここではなぜスクリプト言語では滅多にデバッガーを使わないかをおさらいした
へぼへぼCTO日記 - perl-mongers.orgのメール送信の記事にちとつっこみ
はてブのほうでちょろっと書いたんだけど、 Mail::Sendmail でメール送信の以下のコードについて。 use Encode; use utf8; my $subject = "テスト"; my $message = "テストです。ほげほげ。"; foreach my $str ( $subject, $message ) { utf8::encode($str); Encode::from_to( $str, "utf8", "iso-2022-jp" ); } ここでutf8::encode => Encode::from_toするのは冗長 encode('iso-2022-jp', $str); だけでおｋ。 use utf8してなければ（で、ソースの文字コードがutf8であれば) Encode::from_to( $str, "utf8", "iso-2022-jp" )
第15回 DateTime：APIの標準化をめざして | gihyo.jp
Cから継承したAPI プログラマにとって、ログの解析や作成などに含まれる日付や時刻の操作は切っても切り離せない分野のひとつです。もちろんPerlにも日付や時刻を操作するための関数は組み込まれています。 ただし、Cから継承してきたlocaltime()やgmtime()の返り値は、お世辞にもわかりやすいとはいえません。リストコンテキストで呼び出せば年月日、時分秒などの値を取り出せるとはいえ、単一の配列で受け取ると、個々の要素を使うときに直感的ではなくなりますし、明示的な名前をつけたスカラー変数を並べて受け取るのはいかにも冗長です。 use strict; use warnings; # 短いけれど非直感的 my @tm = localtime(); $tm[5] += 1900; $tm[4]++; printf "%04d-%02d-%02d %02d:%02d:%02d\n", reve
はてなグループの終了日を2020年1月31日(金)に決定しました - はてなの告知
はてなグループの終了日を2020年1月31日(金)に決定しました 以下のエントリの通り、今年末を目処にはてなグループを終了予定である旨をお知らせしておりました。 2019年末を目処に、はてなグループの提供を終了する予定です - はてなグループ日記 このたび、正式に終了日を決定いたしましたので、以下の通りご確認ください。 終了日: 2020年1月31日(金) エクスポート希望申請期限:2020年1月31日(金) 終了日以降は、はてなグループの閲覧および投稿は行えません。日記のエクスポートが必要な方は以下の記事にしたがって手続きをしてください。 はてなグループに投稿された日記データのエクスポートについて - はてなグループ日記 ご利用のみなさまにはご迷惑をおかけいたしますが、どうぞよろしくお願いいたします。 2020-06-25 追記 はてなグループ日記のエクスポートデータは2020年2月28
本を読む mixiの足あとフィードをAPIから取る
mixiが足あと機能をいろいろ変更したのをきっかけに、そういえば足あとってAPIからAtomで取れるんだよなと思い出しました。 例として、Perlから足あとフィードを取得してみます。認証まわりは面倒なのでw3mのクッキーで。 #!/usr/bin/perl use strict; use warnings; use LWP::UserAgent; use HTTP::Cookies::w3m; my $myid = '000000'; my $cookie_file = "$ENV{'HOME'}/.w3m/cookie"; my $url = "http://mixi.jp/atom/tracks/r=2/member_id=$myid"; my $ua = LWP::UserAgent->new; my $cookie = HTTP::Cookies::w3m->new(file =>
第4回 Any::Moose：なにがどうでもムースはムース | gihyo.jp
CPANTSは情報の宝庫 Perlを使う最大の利点といわれるCPANですが、CPANは単なるモジュール置き場ではありません。CPANはまたPerlの利用状況を知るうえで不可欠な統計情報を得る場でもあります。そのような統計情報のいくつかは、いわゆるCPAN検索サイトからも確認できますが、より突っ込んだ情報が欲しい場合はCPANTS（CPAN Testing Service）と呼ばれるサイトを確認するのが便利です。 国内ではnipotanこと谷口公一氏が始めた「輝け！全日本最強 CPAN Author 決定選手権」のネタ元として知られていますが、このサイトでは個々の作者やモジュールの品質だけでなく、そのモジュールが実際にどこで使われているかという情報を得ることもできます。 たとえば前回取り上げたロール関連のモジュールの利用状況を調べてみると、古き良きExporterを依存モジュールとして取り上
ゆーすけべー日記
サキとは彼女の自宅近く、湘南台駅前のスーパーマーケットで待ち合わせをした。彼女は自転車で後から追いつくと言い、僕は大きなコインパーキングへ車を停めた。煙草を一本吸ってからスーパーマーケットへ向かうと、ひっきりなしに主婦的な女性かおばあちゃんが入り口を出たり入ったりしていた。時刻は午後5時になる。時計から目を上げると、待たせちゃったわねと大して悪びれてない様子でサキが手ぶらでやってきた。 お礼に料理を作るとはいえ、サキの家には食材が十分足りていないらしく、こうしてスーパーマーケットに寄ることになった。サキは野菜コーナーから精肉コーナーまで、まるで優秀なカーナビに導かれるように無駄なく点検していった。欲しい食材があると、2秒間程度それらを凝視し、一度手に取ったじゃがいもやら豚肉やらを迷うことなく僕が持っているカゴに放り込んだ。最後にアルコール飲料が冷やされている棚の前へ行くと、私が飲むからとチ
LWP::UserAgentでBASIC認証つきでリクエストする - bits and bytes
恥ずかしながらいままでLWP::UserAgentでリクエストを送るときにどう書くのかがいまいち分からず、ずっと毎回検索していました.... 今回検索して LWP::UserAgentでBasic認証サイトにアクセスする方法｜blog｜たたみラボ を読んで、そのあと HTTP::Request::Common - Construct common HTTP::Request objects - search.cpan.org と見比べて、ようやくいままでの謎が解けました。 use HTTP::Request::Common するとGETやPOST などの名前で HTTP::Request のインスタンスを返す関数がエクスポートされるので、 $ua->request(GET 'http://labs.gmo.jp/blog/ku/'); と書いたりできるようになるのだと知りました.....
mixi for iPhoneから発掘されたmixi日記投稿用API « ku
追記 2008.7.31 はてなブックマークでPUTにすべきというコメントがいくつかあったので、やべーatomPubとかぜんぜんわかってないから自分がちゃんと見ないで勝手にPOSTって書いたかもと思って再度確認したらやっぱりPOSTになってました。googleで検索するとCocoaのNSURLRequestのPUTを使うとなんか不安定っていうのがいくつが出てくるので、そのへんのからみなのかもしれません。あ、あとNokiaのsymbianでPUTがお手軽にできないとかあったりするのかも。 iPhoneからぜんぜん日記を書く手段がなかったらmixiから、mixi for iPhoneという日記を書いたりするiPhoneアプリが公開されました！ 新しいアプリに新しいAPI、日記が投稿できるアプリなら日記投稿用のAPIというわけでmixiのあしあとAPI発掘と同じように掘り起こして見つけました。
以下のperlのコードが動かない理由を教えて下さい。…
以下のperlのコードが動かない理由を教えて下さい。 FizzBuzzのコードなのですが、$iが11,26,41,56,71,86の時にBuzzと出力されてしまいます。 なんとなく直前のループ時の$outの内容が引き継がれている気がしますが、理由がわかりません。 --- #!/usr/bin/perl use strict; use warnings; use Perl6::Say; foreach my $i (1..100) { my $out = "Fizz" if $i%3 == 0; $out .= "Buzz" if $i%5 == 0; say $out || $i; } --- なお$outの宣言を別にしたところ、正常に動作しています。 --- foreach my $i (1..100) { my $out; $out = "Fizz" if $i%3 == 0; $ou
Perlでの不思議な現象 -OKWave
ActivePerl で試しました. ぱっと見た感じ, 0->[0] を $0[0] と解釈しているような気がします. 0 だとわかりにくいのですが, 1->[0] = 1; print keys %::, "\n"; と 1行目のないバージョンを見てみると, 1行目があることにより「1」というキーが増えていることが確認できます. 参照している方の質問 (しまった, 無視してた....) でも同じ現象が起きていると考えられます. ちなみに あっちの #3 はほぼ正解なのですが, :: ではなく main:: を調べたためにわからなくなっているものと想像されます. ちなみに a->[0] = 1; とやると, 今度こそ main:: に入っていることも確認できます.
perl - use CGI; use Encode; # 非英語Webプログラミング3原則 : 404 Blog Not Found
2009年06月23日15:30 カテゴリLightweight Languages perl - use CGI; use Encode; # 非英語Webプログラミング3原則 これは、実はPerlに限らず未だに事実だったりするのですが.... Perl でフォームデータから UTF-8 日本語文字をとりだす方法 (プログラミングの小石・大石) UTF-8 のフォームによっておくられたデータのなかから日本語文字をとりだすことは，日本の Perl CGI プログラマならたいてい必要になることである． ところが，その方法は意外に確立されていないようにみえる． しかし、元発言の方法は先祖帰りすぎるので。 Perlプログラマー以外にも、Webプログラマーであれば有用なentryです。 PerlでWebプログラミングする場合の三原則 QueryはCGIモジュールで処理する 文字コードはEncode
perl - Class::Builtin 0.01 released - perlでもメソッドチェインを! : 404 Blog Not Found
2009年06月21日19:00 カテゴリLightweight Languages perl - Class::Builtin 0.01 released - perlでもメソッドチェインを! リハビリをかねて作りました。 /lang/perl/Class-Builtin/trunk - CodeRepos::Share - Trac dankogai's p5-class-builtin at master - GitHub @CPAN (coming soon)こういうことが出来ます。 #!/usr/bin/perl -l use strict; use warnings; use Class::Builtin; binmode STDOUT, ':utf8'; my $so = OO('小飼弾'); print $so->length; print $so->decode_utf8
もじら組 - 日本で最初の Mozilla コミュニティ
お知らせ 2021.03.06 2020年3月7日、サーバー定期点検のため、終日サービスが停止いたします。ご了承ください。 2020.11.15 もじら組フォーラムを老朽化のため、オープンソースフォーラムに切り替えます。オープンソースフォーラムへのリンクはこちら 2020.02.27 2020年2月28日-3月2日、サーバー定期点検のため、終日サービスが停止いたします。ご了承ください。 2016.10.13 ホームページをリニューアルしました。
Perl Tips: Perl で、BASIC 認証（基本認証）付きのサイトにアクセスするには？
LWP::UserAgent を使うのだが、以下のコードで 太字の行 がポイント。 使用するモジュール use LWP::UserAgent; コード #!/usr/bin/perl use LWP::UserAgent; our $HOME_URL = 'ユーザー名とパスワード付きの URL'; our $USERNAME = '上記 URL にアクセスするためのユーザー名'; our $PASSWORD = '上記 URL にアクセスするためのパスワード'; $ua = LWP::UserAgent->new; $req = HTTP::Request->new(GET => $HOME_URL); <strong>$req->authorization_basic($USERNAME, $PASSWORD);</strong> print $ua->request($req)->as
perl - URI::Amazon::APA released! : 404 Blog Not Found
2009年05月10日20:15 カテゴリLightweight Languages perl - URI::Amazon::APA released! そんなわけで、作りました。 /lang/perl/URI-Amazon-APA/trunk - CodeRepos::Share - Trac dankogai's p5-uri-amazon-apa at master - GitHub @CPAN (coming soon) Amazon アソシエイト・プログラム（アフィリエイト） 公式ブログ: Amazon アソシエイト Web サービスの名称変更および署名認証についてのお知らせ名称変更にともない、Product Advertising API にリクエストを送信いただく都度、認証のための電子署名を含めていただくことが必要になります。この変更は、2009年5月11日より3ヶ月の間の移
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
perl-mongers.org