解決：Scalar::Util::weakenを使おうとするとWeak references are not implementedで落ちる - ヒルズで働く@robarioの技ログ
Scalar::Util::weaken 使ってるスクリプトが全滅。 （略） なんでだろーとおもってとりあえず Scalar::Util 再インストールしたら直った。 謎過ぎる。。同じバージョンだったのに。 うちでも同じ現象が発生しました。 $ perl -MScalar::Util=weaken -e 42 Weak references are not implemented in the version of perl at -e line 0 BEGIN failed--compilation aborted. $ perl -MScalar::Util -e 'print Scalar::Util->VERSION' 1.18CLONtypesterさんと同じく再インストールしたら直りました。 $ cpan -fi Scalar::Util $ perl -MScalar::Ut
crawler.jp - au携帯GPSで位置情報を連続取得する（perl版）
なにかと拝見させていただいているここギコ！さんに、こんなエントリーが！ auのGPS携帯電話の位置を追跡するPerlスクリプトの作成補助者大募集 これはなにかお手伝いしたい！ というわけで、未熟ながら以前phpで書いたものをperlで書いてみました。 といっても、本質的なところはなにも変わってなくて、単純にperlに置き換えただけです。 勢いで書いたので、本当にたいしたことはやってません。。 趣旨を取り違えていたらごめんなさい！ サンプルでは、ローカルのsample.txtというファイルに書き出すようになっていますが、このへんは用途にあわせて書いていただければという感じです。 以下、perlによるサンプルスクリプトです。テストしていないのでご参考までに。 #!/usr/bin/perl -w use strict; use CGI; my $q = new CGI; my $scri
ネット通販サイトの構築と販促支援のインフォマークス
EC ビジネスのパートナーです。 点ではなく、線のお付き合いを大切にしたい。単なるベンダではなく、お客様と共に成長するパートナー、それがインフォマークスです。あらゆる局面でご一緒させてください。 EC コンサルティング 【Get started! EC】 EC事業計画立案でも、業態の変更でも、課題解決でも、お気兼ねなくご相談ください。事業戦略から始まって、システム構築の RFP 作成まで、中立な立場でお手伝いします。 EC ビジネス・コンサルティング EC システム・コンサルティング 統合 EC パッケージ 【Make it! EC】 スタートアップ時はもちろんですが、サイトのリニューアルでも抜群のプレゼンスを発揮しています。なぜなら、模倣の段階から差別化へ向かう分かれ道だからです。 Make it! EC シリーズ コラボレーション
Twitterでお友達になれそうな人をGoogleから探してくれるNet::Twitter::Friend::Find::FromGoogleが面白い
The sbox program encountered an error while processing this request. Please note the time of the error, anything you might have been doing at the time to trigger the problem, and forward the information to this site's Webmaster (webmaster@www.ac.cyberhome.ne.jp).Stat failed. /usr/local/apache2/cgi-bin/~mattn: No such file or directory sbox version 1.10 $Id: sbox.c,v 1.16 2005/12/05 14:58:01 lstein
YappoLogs: GunghoっていうWebクロウラーたんの件
GunghoっていうWebクロウラーたんの件 なんか男前そうなクロウラーたんを発見したお 資料はhttp://www.slideshare.net/lestrrat/gungho-swarmage-pocomdba/を見るべし。 ちなみに、これ書くのに使ったGunghoはVersion 0.09001 のCPANの。 概要 GunghoはPlaggerっぽいwebクロウラーたんです。なのでGunghoの名前空間以下にあるモジュールとかを個別に使おうとしたら大変です。 Gunghoのアーキテクチャにそった一本道な動作をさせるのがいいはず。 設定はConfig::Any使ってるので、色んな形式のを使えます。 Providerにより収集URLを取得し、EngineがHTTPでコンテンツを取得し、Handlerで取得したコンテンツを処理します。 Provider,Engine,Handlerは、そ
404 Blog Not Found:perl - 勝手に添削 - 40行で作るPerl用テンプレートエンジン
2007年10月30日20:00 カテゴリLightweight Languages perl - 勝手に添削 - 40行で作るPerl用テンプレートエンジン 久々の勝手に添削。今回はこちら。 40行で作るPerl用テンプレートエンジン 正規表現がらみなので、Perl以外でも有用。 添削箇所は、こちら。 40行で作るPerl用テンプレートエンジン sub convert { return unless defined(my $str = shift); $str =~ s{&}{&}gso; $str =~ s{<}{<}gso; $str =~ s{>}{>}gso; $str =~ s{\"}{"}gso; $str; } これの最初のsubstitutionが&ではなくて&ではないかというのはさておき、こういった場合、何度も正規表現をかけ
2006/09/02 - memo - unknownplace.org
キクタンおわった(といってもちゃんと覚えてるの半分？くらいだ)けどなんか、前より英語力落ちてる気がする。 つか、なんか英語を書く気にどうしてもなれない。なんだろう。 んで、そんな気分だったのでPlugin::Flavourのドキュメントなんもかかずにアップしたらなんか叩かれてる、、なぁ。 Chainedアクションを使って、/ユーザー名/... だとそのユーザーのエントリを表示。 /... だと全員のエントリを表示するアプリケーションの例。 最後にはてなっぽく /ユーザー名/profile もつけてある。 package MyApp::Controller::UserView; use strict; use warnings; use base 'Catalyst::Controller'; sub user_detect :Chained('/') :PathPart('') :Capt
tokuhirom blog
Blog Search when-present<#else>when-missing. (These only cover the last step of the expression; to cover the whole expression, use parenthesis: (myOptionalVar.foo)!myDefault, (myOptionalVar.foo)?? ---- ---- FTL stack trace ("~" means nesting-related): - Failed at: ${entry.path} [in template "__entry.ftlh" at line 3, column 25] - Reached through: #include "__entry.ftlh" [in template "entry.ftlh" at
perldelta - perl 5.10.0 の新機能
perldelta - perl 5.10.0 の新機能 perldelta - what is new for perl 5.10.0 名前 NAME perldelta - perl 5.10.0 の新機能 perldelta - what is new for perl 5.10.0 説明 DESCRIPTION このドキュメントでは 5.8.8 リリースと 5.10.0 リリースとでの相異点を 説明します. This document describes the differences between the 5.8.8 release and the 5.10.0 release. 5.10.0 でのバグ修正の多くは既に 5.8.X メンテナンスリリースで見ることができます; それらはここには重複しないで, perl58[1-8]?delta の マニュアルページ群に記載し
ゆーすけべー日記
サキとは彼女の自宅近く、湘南台駅前のスーパーマーケットで待ち合わせをした。彼女は自転車で後から追いつくと言い、僕は大きなコインパーキングへ車を停めた。煙草を一本吸ってからスーパーマーケットへ向かうと、ひっきりなしに主婦的な女性かおばあちゃんが入り口を出たり入ったりしていた。時刻は午後5時になる。時計から目を上げると、待たせちゃったわねと大して悪びれてない様子でサキが手ぶらでやってきた。 お礼に料理を作るとはいえ、サキの家には食材が十分足りていないらしく、こうしてスーパーマーケットに寄ることになった。サキは野菜コーナーから精肉コーナーまで、まるで優秀なカーナビに導かれるように無駄なく点検していった。欲しい食材があると、2秒間程度それらを凝視し、一度手に取ったじゃがいもやら豚肉やらを迷うことなく僕が持っているカゴに放り込んだ。最後にアルコール飲料が冷やされている棚の前へ行くと、私が飲むからとチ
はてなグループの終了日を2020年1月31日(金)に決定しました - はてなの告知
はてなグループの終了日を2020年1月31日(金)に決定しました 以下のエントリの通り、今年末を目処にはてなグループを終了予定である旨をお知らせしておりました。 2019年末を目処に、はてなグループの提供を終了する予定です - はてなグループ日記 このたび、正式に終了日を決定いたしましたので、以下の通りご確認ください。 終了日: 2020年1月31日(金) エクスポート希望申請期限:2020年1月31日(金) 終了日以降は、はてなグループの閲覧および投稿は行えません。日記のエクスポートが必要な方は以下の記事にしたがって手続きをしてください。 はてなグループに投稿された日記データのエクスポートについて - はてなグループ日記 ご利用のみなさまにはご迷惑をおかけいたしますが、どうぞよろしくお願いいたします。 2020-06-25 追記 はてなグループ日記のエクスポートデータは2020年2月28
ひげぽん OSとか作っちゃうかMona- - [Perl] XS利用でPerl高速化
（追記：2009/03/25） id:tokuhirom さんからコメントを頂きました。このベンチマークは問題があるそうです。 http://d.hatena.ne.jp/higepon/20050615/1118829090#c （追記：終わり） PerlにはC言語で書かれた関数を呼び出すためにXSという仕組みが存在します。 一部CPANモジュールでも使われているためご存知の方も多いと思いますが、今回はこのXSの簡単な利用方法を紹介したいと思います。 なおXSは、はてなでも使用しています。 さてXSモジュールを使うとうれしい事は C言語で書くことにより、処理が高速になる可能性がある 既存のC言語ライブラリ資産をPerlから利用することができる Perlがあまり得意でない、メモリ内などに存在するビット単位での細かなデータ構造を、あれこれできる などが挙げられると思います。 今回は、高速化に
![ひげぽん OSとか作っちゃうかMona- - [Perl] XS利用でPerl高速化](https://cdn-ak-scissors.b.st-hatena.com/image/square/c8c4bb60cf47745b4128808788a15216f5f5dcdf/height=288;version=1;width=512/https%3A%2F%2Fogimage.blog.st-hatena.com%2F13208692334729888502%2F17391345971656215022%2F1529549377)
perlxs - XS言語リファレンスマニュアル
NAME DESCRIPTION Introduction On The Road The Anatomy of an XSUB The Argument Stack The RETVAL Variable The MODULE Keyword The PACKAGE Keyword The PREFIX Keyword The OUTPUT: Keyword The INIT: Keyword The NO_INIT Keyword Initializing Function Parameters Default Parameter Values The PREINIT: Keyword The SCOPE: Keyword The INPUT: Keyword Variable-length Parameter Lists The PPCODE: Keyword Returning U
livedoor Developers Blog:String::Trigram でテキストの類似度を測る - livedoor Blog（ブログ）
こんにちは。検索グループ解析チームの nabokov7 です。 今回は、livedoor キーワードでの事例より、テキストの類似度を測るのに便利な手法を紹介します。 livedoor キーワードは、livedoor ブログでその日その日で話題になった語をランキング表示するサービスです。 当初、はてなキーワードやWikipediaを足して2で割ったようなサービスを作れといった開き直った指示のもとで開発が開始されたともいう、分社化前の芸風の名残で、キーワードの検索結果にはユーザが自由に解説を書き込める Wikipedia 的スペースもついています。 で、この解説部分に、さまざまなサイトから文章をまる写ししちゃう人がとても多いのですね。 特に多いウィキペディア日本語版からの剽窃を防止するために、livedoor キーワードでは以下のような対策を講じることにしました。 ウィキペディア日本語版の解説
tokuhirom blog
Blog Search when-present<#else>when-missing. (These only cover the last step of the expression; to cover the whole expression, use parenthesis: (myOptionalVar.foo)!myDefault, (myOptionalVar.foo)?? ---- ---- FTL stack trace ("~" means nesting-related): - Failed at: ${entry.path} [in template "__entry.ftlh" at line 3, column 25] - Reached through: #include "__entry.ftlh" [in template "entry.ftlh" at
tokuhirom blog
Blog Search when-present<#else>when-missing. (These only cover the last step of the expression; to cover the whole expression, use parenthesis: (myOptionalVar.foo)!myDefault, (myOptionalVar.foo)?? ---- ---- FTL stack trace ("~" means nesting-related): - Failed at: ${entry.path} [in template "__entry.ftlh" at line 3, column 25] - Reached through: #include "__entry.ftlh" [in template "entry.ftlh" at
TL - Perlフレームワーク
TripletaiLとは TripletaiLは、プログラミング言語であるPerlで日本語のWebアプリケーションを構築するためのフレームワークです。 安全性、生産性、保守性という三つの要素を重視しており、少人数での開発に適する形で設計されています。 本フレームワークはオープンソースとして、meta::cpan上で公開されています 安全性 セキュリティに配慮した設計がなされており、これに関連する機能を備えています。 テンプレートへの文字列展開やフォームへの値の埋め込み時に、自動で <> などの文字をエスケープします。 DBへのSQL実行におけるプレースホルダはもちろんのこと、CSRFを防止する機能や、セッションにおいて同一ドメイン上HTTP/HTTPS両方の領域で安全かつ領域をまたいでも安全に扱うことが可能なdoubleモードといった機能があります。 生産性 TripletaiLは日本製で
DSAS開発者の部屋:携帯ゲートウェイのIPアドレス帯更新を効率的に確認する方法
携帯電話各キャリアは、そのゲートウェイのIPアドレス帯域を公開しています。 DoCoMo au SoftBank WILLCOM 携帯ブラウザからのアクセスの場合、このIPアドレスがソースアドレスとなるので、アクセス制御や判別のために使っている方は多いのではないかと思います。 今回は、このIPアドレス帯の更新を効率的に確認する方法についてのお話です。 更新されたかどうかの確認だけならアンテナ系のWebサービスを使えばよいのですが、それだけだと、 どのIPアドレス帯が追加・削除されたのかわかりづらい。 IPアドレス帯のコピペが面倒くさい。 といった不満点があります。 そこでNet::CIDR::MobileJPというPerlのモジュールの出番です。(作者はモバイルファクトリという会社の方のようです) このモジュールには与えたIPアドレスが携帯かどうかを判別する機能があるのですが、次のようにす
assetsの罠の対処法 - Charsbar::Note
これは 3月にこの機構をつけたときから把握していて、なんとかインストール時にいれるようにはしたいなと思ってます。オプションとしては、 /usr/local/share/plagger などにいれる Perl の @INC にいれる pm ファイルの __DATA__ にダンプして、初回実行時に ~/.plagger/assets などにコピー というあたりがあると思っていて、どれも一長一短な感じです。解決したい前提は、 root 権限なしでもインストールできなければならない バージョンアップした際の古いファイルの更新や削除、リネームに対応できなければならない Filter::EntryFullText のように大量にファイルがある場合、デフォルトでそれをすべてロードするのは鬱陶しい気がする といったところ。 ロンドンにいる間にちょっと考えてみます。ppm/yum/ports/apt をつく
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
kazeburo : アイコン(サムネイル)を作るモジュール