TechCrunch Daily News Every weekday and Sunday, you can get the best of TechCrunch’s coverage. Startups Weekly Startups are the core of TechCrunch, so get our best coverage delivered weekly.

目次 2006年12月31日 - 年越しそば / 2006年の大晦日 / 2006年12月30日 - 本を書く / 本を書く / キリスト教の洗礼を受けた方からのメール / 2006年12月29日 - 夜中の0時ころまでIRCでおしゃべりしましょう→終了 / 実家 / 2006年12月28日 - 本を書く / 本を書く / 2006年12月27日 - 再校読み合わせの後で / 2006年12月26日 - 再校読み合わせ / 再校 / トドちゃん / 2006年12月25日 - 再校 / 日経ソフトウエアに「クッキー」の記事を書きました / よかった探しリース、新規参加は今日までです / 原稿 / 原稿 / 2006年12月24日 - 再校 / クリスマスイブ / 2006年12月23日 - 再校 / イブ礼拝 / 原稿 / ジョーク / 再校 / 原稿 / 2006年12月22日 - 再校
[Perl] Wide character in print atというエラーはUTF-8フラグが付いた文字列をprintしようとしているからである。なのでUTF-8フラグを取り外してからprintすればエラーがでなくなります。UTF-8フラグが付いているかどうかはutf8::is_utf8を使用すればよい。 #UTF8フラグが付いているかの確認 utf8::is_utf8では実際の文字列がUTF-8かどうかではなく、あくまでフラグがついているかどうかを確認します。そのため、UTF-8の文字列もフラグが付いていなければ上記の出力はno flagとなります。またutf8::is_utf8はuseしなくても使用できる。useすると全然違う意味あいになるので注意。 UTF-8フラグが付いていたら、encodeを使用してフラグをはずします。以下の例では$stringをutf-8に変換して出力します
以下のプログラム(参考:作って学ぶ、今どきのWebサービス: 第2回 RSSフィードの料理はLWPとXML::RSSにおまかせ)を実行したら、「Wide character in print at」というメッセージが print を実行する度に出力されてしまった。 #!/usr/local/bin/perl # http://www.ibm.com/developerworks/jp/webservices/library/itm-ws2-rss/ use strict; use Encode; use LWP::Simple; use XML::RSS; my $url = shift; my $document = LWP::Simple::get($url) or die "cannot get content from $url"; my $rss = XML::RSS->new;
Wide character in print at これは、UTF-8とかUnicodeを使い、マルチバイト文字を出力するときにでてくるエラーメッセージです。 メッセージがでてもPerlが終了するようなことは無いので、そのまま続きの処理が実行されますが、でてきたらきもいですよね。 プログラムの最初の方でbinmodeプラグマを使い、出力文字がutf8であることを指定すればでなくなります。 binmode STDOUT,":utf8"; UTF-8の文字列が入ったファイルを扱う際に文字化けが発生した場合、 use open ":utf8"; を記述し、入出力がUTF-8であることを指定すれば文字化けの回避ができる場合が多いです。 Unicodeじゃなかった時代のPerlはUnicodeもシングルバイトで処理してたからこんなことしなくてよかったんですがね。 Unicodeになって、マルチバイ
http://search.cpan.org/dist/PDF-API2/ PDFファイルを生成する必要があったので、cpanを眺めていたら、PDF::API2というモジュールがありました。 これまでPDFファイルの自動生成というと、pdfjやpdflibの名前を聞いたことがありますが、PDF::API2でも十分に使えるように思えます。 今回は、予めprimoPDFで作成(印刷?)した帳票上(というより背景として?)に、文字や写真を追加してみました。 #!/usr/local/bin/perl use strict; use warnings; use encoding qw/cp932/; #cp932以外では機種依存文字がpdfに出力されない? use PDF::API2; use PDF::API2::Resource::CIDFont::CJKFont; main(); sub m
PDF::API2 - PDF 生成及び更新の次世代 API PDF::API2 - The Next Generation API for creating and modifing PDFs. 名前 NAME PDF::API2 - PDF 生成及び更新の次世代 API PDF::API2 - The Next Generation API for creating and modifing PDFs. 概要 SYNOPSIS use PDF::API2; $pdf = PDF::API2->new; $pdf = PDF::API2->open('some.pdf'); $page = $pdf->page; $page = $pdf->openpage($pagenum); $img = $pdf->image('some.jpg'); $font = $pdf->corefon
perl 5.8.1 built blog.bulknews.net: perl 5.8.1 is out perl 5.8.1 がでました。 FreeBSD 4.4R でビルドできません ... プラットフォームの問題ではなく、/ の空き容量が極端にがすくないのが原因かもしれませんが。 別の同一アーキテクチャ、freebsd なマシンでビルド、rsync して make install でちゃんと入りました。/usr/bin/perl は元のまま、/usr/local/bin/perl は 5.8.1 です。 さてモジュールのインストールが大変。 perl 5.005_03 時代の遺産を CPAN シェルの autobundle でパッケージングします。 % sudo /usr/bin/perl -MCPAN -e autobundle もし途中で eval 失敗みたいなエラーがでたら、
JSON は JavaScript での処理を前提にしたものが多く、Perl などほかの言語で処理をする場合のサンプルがなかったので、記しておく。 #!/usr/bin/env perl use strict; use warnings; use utf8; use Encode; use JSON; use LWP::UserAgent; use Data::Dumper; use URI::Escape; my $yahoo_app_id = 'your_app_id'; my $agent = 'Mozilla/4.0 (compatible; MSIE 5.01; Windows NT 5.0)'; my $apibaseuri = 'http://jlp.yahooapis.jp/KeyphraseService/V1/extract'; my $referrer = 'http
Pusat Bantuan Order & Pembayaran Pembatalan Pesanan Pengiriman PIONTOGEL dan PIONTOGEL LOGIN serta PIONTOGEL TOGEL merupakan gerbang utama untuk menuju dunia permainan togel yang eksklusif dengan hadiah terbesar, tingkat keamanan yang sangat tinggi, dan layanan yang super premium. Pengembalian Barang & Dana
Mac OS Xでもlocal::libをつかってCPANモジュールを入れよう - JPerl Advent Calendar 2009 Perl に関するちょっとした Tips をのっけてみるよ。ちゃんと続くかな? 概要 local::libは簡単にいうとCPANモジュールをシステム標準とは違う任意のディレクトリにインストールする設定を支援してくれる便利ツールです。root権限の無いレンタルサーバーでCPANモジュールをインストールするために使われたり、Remedieのように依存CPANモジュールごとまとめて配布するのに使われたりします。 今回はMac OS Xでsudo権限を使わずにCPANモジュールをインストールするための方法を解説します。 標準のPerlのモジュールと後からインストールしたCPANモジュールを別ディレクトリに分けておけるので OSのインストールしなおしでもバージョン
HTML::AutoPagerize を使ってみた。 コードは HTML::AutoPagerize - Utility to load AutoPagerize SITEINFO stuff - metacpan.org からほぼコピペ。 autopagerize_tumblr.pl #!/usr/bin/perl use HTML::AutoPagerize; use LWP::Simple; my $autopager = HTML::AutoPagerize->new; $autopager->add_site( url => 'http://.+.tumblr.com/', nextLink => '//div[@id="content" or @id="container"]/div[last()]/a[last()]', pageElement => '//div[@id="
Current Release: XML::Xerces 2.7.0-0 XML::Xerces is the Perl API to the Apache project's Xerces XML parser. It is implemented using the Xerces C++ API, and it provides access to most of the C++ API from Perl. Because it is based on Xerces-C, XML::Xerces provides a validating XML parser that makes it easy to give your application the ability to read and write XML data. Classes are provided for pars
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く