Big Sky :: Perlでブックオフの店舗を検索し、結果をハッシュの配列に格納する
« vimからVisual Studioを操作出来るvisual_studio.vimの日本語対応してみた。 | Main | ゆの in Boo » HTML::TreeBuilderは便利だけど、データ構造がロジックになってしまうのが難点。 Perlでブックオフの店舗を検索し、結果をハッシュの配列に格納する - As a Futurist... HTMLを解析する練習です。Perlの配列とかハッシュの扱いも少し分かりました。 以下のブックオフの検索をPerlでやっただけです。 http://blog.riywo.com/2008/03/31/164327 ってことでWeb::Scraperで。 #!/usr/bin/perl -w use strict; use warnings; use URI; use Web::Scraper; use YAML; my $str = shift
perl - 暗黙的な参照 # @_ と $_ : 404 Blog Not Found
2008年07月06日19:30 カテゴリLightweight Languages perl - 暗黙的な参照 # @_ と $_ Good Question! @_の要素の$_[0],$_[1]等は、格納するべきアドレスが可変！ - 燈明日記 なぜ、こんな仕様にしたのだろうか･･･。 Good Question だけあって、Good Reasons もきちんとあります。 @_と$_の秘密 まず、事実を再確認しておきましょう。 Perlにおいて、引数を格納する配列@_は、常に参照(reference)です。値(value)ではありません。 これが何を意味するかというと、@_への書き込みが、呼び出し元への書き込みとなるということです。 実際に様子を見てみましょう。 [Run via CodePad] sub inc { ++$_[0] } my $a = 0; print $a, "\n"
muxtapeに音声botを作った (polog)
http://kyoujin.muxtape.com/ 全く何言ってんのかわかりませんがたまに'きほーんーてーきー'とか'そウCてーもぅUだーCta-'とか言い出して吹きます。 ソースは以下。 #!/usr/bin/perl use strict; use LWP::Simple; use XML::RSS; use Lingua::JA::Romanize::Japanese; use Data::Dumper; use Date::Simple; use WWW::Mechanize; sub reduce_candidate{ my $str = shift; my @words = split / /, $str; my @_words; for my $word (@words){ if($word =~ /^(.+?)\//){ push(@_word
携帯ブラウザのユーザーエージェント（User-Agent）による機種判別、キャリア判別
ドコモ、au、ソフトバンクの各携帯電話のブラウザのユーザーエージェントは、パソコンのブラウザと同様にプログラムで取得することができる。 ユーザーエージェントを利用してキャリアの判別や機種判別を行うことができる。 ユーザーエージェントには、ドコモなら「DoCoMo」、au・TU-KAなら「UP.Browser」、ソフトバンクなら「J-PHONE」、「Vodafone」、「SoftBank」という文字列が含まれている。 これらの文字列を調べることで携帯電話のキャリアを判別することができる。 ただし、Vodafoneの一部の機種は、「UP.Browser」という文字列がユーザーエージェントの途中に含まれている。 キャリアを判別する場合は、「ユーザーエージェントの先頭の文字が何で始まるか」で判別した方が良いと思われる。 また、ユーザーエージェントには機種名の文字列が含まれているので、機種の判別を行
ラリー・ウォール＠Perlは、とっっても愛妻家！／Ｔｅｃｈ総研
質問の一つひとつに熟考して真摯に答えてくれる態度、深みと含蓄のある言葉、初対面の人間に対する優しい接し方……そして、返答に窮すると隣の奥さんに「どうだっけ？」と呼びかける夫婦仲のよさ。私はラリー・ウォールさんの大ファンになりました。もちろん、奥さんのグロリアさんのファンにも。
ＱＲコード 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が必要です。 表示できるＱＲコードは model2 の version 1～40 でいくつかの機能は実装されていません。 詳しくは添付ドキュメント
はてダのはてブ内人気記事ベスト50を取ってくるperl script - あそことは別のはらっぱ
http://d.hatena.ne.jp/tragedy/20080522/p1で作っているベスト50つうのは、本人も言うとおり『d.hatena.ne.jp』 の人気エントリー - はてなブックマークを成形したものだそうで。 であれば、普通にスクレイピングしてくればいいのかな、ということで。 #!/usr/bin/perl use strict; use Web::Scraper; use URI; use utf8; # init my $entry_body = scraper { process '.entry-body > a.bookmark', 'url' => '@href'; process '.entry-body > a.bookmark', 'title' => 'TEXT'; process '.entry-body > a.domain' , 'writer'
第4回 Catalyst（前編）---Perl向けWebアプリ・フレームワーク
この記事は，日経ソフトウエア2006年9月号，連載「簡単実装で学ぶWeb技術2006」の第3回「Catalyst――Perl向けWebアプリ・フレームワーク」の再録です。記事は執筆時の情報に基づいており，現在では異なる場合があります。 こんにちは，結城浩です。今回はPerlのWebアプリケーション・フレームワーク「Catalyst」を解説し，簡単なメモ帳プログラムを作ります。 Catalyst（カタリスト）は，Perlで作られたWebアプリケーション・フレームワークです。Catalystを使うと，Webアプリを簡単に作成・テスト・配布することができます。catalystという単語のそもそもの意味は，「触媒」あるいは「促進させるもの」です。Perlのモジュール同士を触媒のようにうまく結びつけて，Webアプリ作成を促進させるという意味の名前なのでしょう。 Catalystのオフィシャルページは
プログラムっておいしいの？ - iGirl
ってゆうスイーツ(笑)が少しでもプログラムを理解するには何をしたらいいのでしょうか。何を読んだらいいのでしょうか。ググればググるほど分からなくなってきました。 「初心者のための・・」系を読んでも、サンプルコードというものを見ても、何のこっちゃ分からずで*1、perlにしようかPythonにしようかjavaにしようかC++にしようかとか言ってる場合じゃありません。C++とC#は別クチなんすかね？ですよね。ｷﾞｬｰ！ どんなふうに始めればいいか分からないしたぶん「私には無理！生まれたときから文系だもん！むしろ文系から生まれたもん！」とか言い訳垂れて諦めるかもしれないんだけど、とりあえず何となく話だけでも分かる風になりたいなーとか思ってー。諦めるまでに達せない自分が歯がゆい＞＜ ギークに「プログラム始めたきっかけって何ですか？」みたいに聞くと（あと記事とか読むと）「自分でゲームを作ったのがはじめ
ゆーすけべー日記
サキとは彼女の自宅近く、湘南台駅前のスーパーマーケットで待ち合わせをした。彼女は自転車で後から追いつくと言い、僕は大きなコインパーキングへ車を停めた。煙草を一本吸ってからスーパーマーケットへ向かうと、ひっきりなしに主婦的な女性かおばあちゃんが入り口を出たり入ったりしていた。時刻は午後5時になる。時計から目を上げると、待たせちゃったわねと大して悪びれてない様子でサキが手ぶらでやってきた。 お礼に料理を作るとはいえ、サキの家には食材が十分足りていないらしく、こうしてスーパーマーケットに寄ることになった。サキは野菜コーナーから精肉コーナーまで、まるで優秀なカーナビに導かれるように無駄なく点検していった。欲しい食材があると、2秒間程度それらを凝視し、一度手に取ったじゃがいもやら豚肉やらを迷うことなく僕が持っているカゴに放り込んだ。最後にアルコール飲料が冷やされている棚の前へ行くと、私が飲むからとチ
regexp - 全角英数字を半角に : 404 Blog Not Found
2008年01月14日03:30 カテゴリLightweight Languages regexp - 全角英数字を半角に きっかけは、はてなハイク。 自分と根本的にあわない人 - fmht7 - はてなハイク PCで英数字をダブルバイトで入力する人 禿同、しかし人を憎みたくなかったので。 Perlではお茶の子さいさい。 perl - dankogai - はてなハイク perl -CIO -ple 'tr/\x{FF01}-\x{FF5e}/\x21-\x7e/' は脊髄でひねり出せた。 どうせならJavaScriptでもやってみよう、ということでひねり出したのがこちら。 ！釤＃＄％＆釻（）＊＋，−．／ ０１２３４５６７８９：；＜＝＞？＠ ＡＢＣＤＥＦＧＨＩＪＫＬＭＮＯＰＱＲＳＴＵＶＷＸＹＺ ［＼］＾＿｀ ａｂｃｄｅｆｇｈｉｊｋｌｍｎｏｐｑｒｓｔｕｖｗｘｙｚ ｛｜｝〜 var fasci
[Perl] my と local と our の違いについて - 竹迫の近況報告
404 Blog Not Found:perl - myとourとscopeと みんな難しく考えすぎです。 （例外については後で考えることにして）とりあえず以下の基本をおさえておけば混乱することはないと思います。 ■ our 宣言について our はグローバル変数をスマートに使用するための宣言です。our は use vars と等価と考えてください。 our $var; は use vars qw($var); と等価。 our $var = 1; は use vars qw($var); $var = 1; と同じ動きをするもの、と覚えておけばOKです。それ以上の違いは基本的にないと考えて構いません。 ひとつ実用上の違いがあるとすれば、our は Perl 5.6 以降の built-in なのに対して、use vars は vars.pm の Perlスクリプトで実装されています。し
![[Perl] my と local と our の違いについて - 竹迫の近況報告](https://cdn-ak-scissors.b.st-hatena.com/image/square/e92af714c36668a34ee1fdf7dd8464828acfcc1d/height=288;version=1;width=512/https%3A%2F%2Fogimage.blog.st-hatena.com%2F8454420450103834818%2F17680117126987713958%2F1551691469)
これから一からプログラミングを覚えようと考えています。…
これから一からプログラミングを覚えようと考えています。 様々な言語がありますが、どれを覚えるべきでしょうか？ なお、条件は下記の通りです。 やりたいこと ・Webサービス（AmazonやGoogleなど）を使った簡単なWebアプリが作れるようになりたい。 私のスペック ・プロとしてのWebデザイン経験があり、現在はWebディレクタ的な職にある。 ・システム関係の簡単な要件定義等は行ったことがあるが、あくまで発注側。 ・あえていうならJavaScriptの知識がある程度。SQLとかまったくわからない。 Web屋なので普通に考えるとPHPと言うことになるかとは思うのですが、 最初からならrubyとかPythonとかのほうが面白いという意見も聞きます。 「覚えやすさ」「開発の簡単さ」あたりを重視してご回答いただければうれしいです。
PHP・Perl各種テンプレートエンジンの処理速度比較
はじめに 最近のWEBアプリケーションではテンプレートエンジンと呼ばれる仕組みを用いてHTML表示を行うのが主流になっている。 テンプレートエンジンとは、 print "<html>"; print "<h1></h1>"; print "</html"; のように、print()で直にHTMLを出力するんじゃなくって、 <html> <h1>[% mesg %]</h1> </html> のようなテンプレートファイルを用意し、それをスクリプトで読み取り、整形加工し、HTMLとして出力する仕組みのこと。 テンプレートエンジンを用いることで、HTMLの見た目の修正に必要なのはテンプレートファイルだけになり、メンテナンス性が向上する。 PHPとPerlの代表的なテンプレートエンジンはどの程度の処理速度を持つのか、検証してみた。 対象のテンプレートエンジン Perl HTML::Templa
スクリプト言語文法比較 perl / php
お品書き ● 文法(スクリプト編) ● 文法(メジャー編) ● PHPよくつかう関数 ● YGS2Kリファ ● なんでも掲示板 ● リンク ● 裏リンク ● てりリン カテゴリ ● :Prog ● :UNIX 最新の10件2007-12-03リンク 2007-10-22裏リンク 2007-10-01飛鳥ももこ 2007-09-30GCCで開発 2007-08-10DでAudiere 2007-07-02なんでも掲示板 2007-06-28TeriyakiWiki 2007-01-12BCCで開発 2006-12-26言語文法比較 2005-10-15PHPよくつかう関数 出口 ● ここのTOP ● ここの日記 ★：外部リンク
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
Perl入門
Perl逆引き辞典 - サンプルコードによる Perl 入門
codepad
使えるIDEを一挙まとめて：C/C++、Java、.NET、Perl、PHP、Python、Ruby:ニュース - ZDNet Japan
Ground-SunLight