Perl のEncode.pm について。今さらながらに、わかったこと。

特に文字コードを意識することなくフツーに文字コード shift_jis で書いたスクリプト内で、日本語を print しても文字化けしないのは、たまたま処理がうまくいってるだけなんだということが今さらになって、わかった。※ちなみに、WindowsXP、Perl v5.10.1 な…

2011-10-29

Perlで複数行の置き換えをやってみたよ

mをsにしたら結構サクッと置き換えもできちゃった。てへっ。 #!/usr/bin/perl # # 複数行の置き換えを行うスクリプト-2 # 2011.10.29_scripted by perl48 use strict; use warnings; my $multiple_data; foreach my $data (<DATA>) { $multiple_data .= $data } #p</data>…

2011-10-29

Perlで複数行のマッチをやってみたよ

複数行のマッチとかできたら幸せになれるのに･･･って思いながら結城浩さんの『Perl言語プログラミングレッスン』を読んでたらできました。 #!/usr/bin/perl # # 複数行の置き換えを行うスクリプト # 2011.10.29_scripted by perl48 use strict; use warnings…

2011-04-17

宮川プロダクツWeb::Scraperを使って楽天の商品情報をブッコ抜いてみたよ。

待望の冨田尚樹氏の書籍『Perl CPANモジュールガイド』が発売になった。早速購入！「この本の登場で、Perl業界が盛り上がること間違いなし！」などと妄想しつつ、書籍を参考にしながら以前使いこなせずに挫折したWeb::Scraper を試してみた。お題は『楽…

2011-04-07

DELLのチャットの対応がヤヴァい。

お昼休みに、DELLのチャットでPCについて質問してみました。リアルタイムだから当たり前だけど、対応超はぇぇ。「FreeBSDを入れてUQWimaxにしようと思うんですが･･･」という「は？勝手にやれよ。」と言われそうな質問にも丁寧に答えてくれました。ちょ…

2011-03-29

Perlの聖書（ラクダ本）が届いた！

ついに、ペーパーバックの英語の中古本だけど、 2,050円（送料込み）で買った『Programming Perl』が届いたー！！よくよく見ると、2000年出版の3rd Edition でPerl 5.6までしかカバーしてなかったりするw Unicode の節が、「将来実装予定だぜ」的なこと書い…

2011-03-27

Perl=>WWW::Mechanizeでの日本語の扱いでつまづき、解決した件。

WWW::Mechanizeを使いこなしたいオライリーの『SPIDERING HACKS』を買ってからというもの、「MADにWEBの情報を集めて整理してエグイ感じで発信してやるぜ、グヘヘ」と思っていたが、いまいち進んでいない。一番の原因は、日本語マルチバイトの壁。使って…

2011-02-20

CentOS 5.5のPHPをバージョン5.3.5 にアップグレードしてみた件。

CentOS 5.5のPHPをバージョン5.3.5 にアップグレードしてみたお。探せばいるもので、CentOS 5.5のPHPをバージョン5.3.5 にアップグレードしてみました。基本的には（というか１から１０まで）Natzさんのブログの手順通りにやりました。 Natzさん、スペシャ…

2011-02-19

CentOS5.5 の標準PHPバージョンが5.1.6なので、yum でPHP5.2.16にアップグレードしてみた。

CentOS5.5 の標準PHPバージョンが5.1.6なので、yum でアップグレードしてみたときのメモ。入力コマンド（１） # yum update出力結果（１） Loaded plugins: fastestmirror Loading mirror speeds from cached hostfile * addons: rsync.atworks.co.jp * base…

2011-01-28

Perlでテキストファイルの半角スペースを取り除く

#!/usr/bin/perl use strict; use warnings; use utf8; # フィルハンドルを開いてコンテンツを読み込む open my $contents, '<', 'digital_dic2.txt'; # 半角スペースを取り除き半角スペースタグ除去後のコンテンツを表示する # 改行は残したいのでケツに\n…