JAPAN/MARC関連ツール
以下のプログラムは、国立国会図書館から頒布されているJAPAN/MARCレコードデータを読み取り、プレインテキストに変換する簡単なプログラムです。 無償・無保証・著作権放棄として公開しますので、ご自由にお使いください。 不明な点等ありましたら、mailto:tmasao@acm.org までご連絡ください。 Perl版プログラム jmarc-Perl.20020318.tar.gz Japan/MARCのレコード構造を読み取り、 文字コードがASCII・ISO-2022-JPからなるプレインテキストに変換します。 スクリプト言語であるPerlで実装したものです。 改造などに適しています。 上記のファイルをダウンロードし、解凍・展開してください。 展開してできたファイルjmarcfilter.plが、 Japan/MARC形式のデータをプレインテキストに変換するプログラムです。 例えば、以下
TL - Perlフレームワーク
TripletaiLとは TripletaiLは、プログラミング言語であるPerlで日本語のWebアプリケーションを構築するためのフレームワークです。 安全性、生産性、保守性という三つの要素を重視しており、少人数での開発に適する形で設計されています。 本フレームワークはオープンソースとして、meta::cpan上で公開されています 安全性 セキュリティに配慮した設計がなされており、これに関連する機能を備えています。 テンプレートへの文字列展開やフォームへの値の埋め込み時に、自動で <> などの文字をエスケープします。 DBへのSQL実行におけるプレースホルダはもちろんのこと、CSRFを防止する機能や、セッションにおいて同一ドメイン上HTTP/HTTPS両方の領域で安全かつ領域をまたいでも安全に扱うことが可能なdoubleモードといった機能があります。 生産性 TripletaiLは日本製で
たぽろだ TOP
たぽろだはモリタポを利用したアップローダーです。ここではアップローダースクリプトの配布と、解説をおこなっていますここは、たぽろだ のCGI配布サイトです。 たぽろだ とは、ダウンロードする時にモリタポを支払う必要があるアップローダーです。モリタポのユーザーであれば誰でもファイルをアップロード/ダウンロードできます。 また、モリタポのユーザーであれば誰でも たぽろだ の管理者に成る事ができます。管理者は自分が管理する たぽろだ からファイルがダウンロードされると手数料をもらう事ができます。 初めての方は、まず、モリタポの会員登録をしてください。 すでにモリタポをお持ちの方は、下記の「設置方法」「FAQ」を参考に、たぽろだ を設置・運営してみましょう。 「たぽろだ市場」からファイルを探してください。 ファイルのダウンロードにはモリタポアカウントと、モリタポが必要です。 (
葬式・葬儀情報
SigapBet Bandar Judi Online Pilihan Terbaik di Kalangan Pemain Judi Online SigapBet merupkan bandar judi bola online yang terus menjadi pilihan utama bagi para penjudi yang ingin meraih keuntungan maksimal. Dengan berbagai fitur dan layanan unggulan, SigapBet memberikan pengalaman taruhan online olahraga yang tak tertandingi. Sigap Bet menyediakan beragam promosi dan bonus kepada para pemainnya, m
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 の数値変換
Last Updated: 2002/03/26 Perl で、16進文字列、10進整数、2進文字列、バイナリー文字列の相互変換を行うための、スクリプトメモです。 特に断っていない限り、Perl 5.001 以上で動作します。 目次 16進文字列からの変換 10進整数からの変換 2進文字列からの変換 バイナリー文字列からの変換 16進文字列→10進整数への変換 hex() 関数は、16進文字列を整数値に、手軽に変換できます。 $num10 = hex("4A"); # $num10 には 74 が入る $num10 = hex("FFFFFF"); # $num10 には 16777215 が入る 余談ですが、数値リテラル中では 0x に続けて 16 進数で記述することで、数値を表すことができます。 $num10 = 0x4A; # 74 $num10 = 0xFFFFFF; # 1677
unpack - 5部 関数リファレンス - [SMART]
unpackはpackの逆を行ないます。バイナリデータの構造体を含む文字列EXPR を受け取り、それをリスト値に展開して返します。スカラコンテキストでは、最初の値を返します。TEMPLATEは、pack関数と同じフォーマットを使います。 unpackの使い方 unpack "C", $word; unpackで部分文字列を取り出す unpackで部分文字列を取り出すことができます。大量の値を一度に取り出すときは、substrよりも高速です。 $a = "It's funny how money change a situation"; # 5文字進んで、5文字取り出す print unpack( "x5 A5", $a ); > funny
pack [Perl講座 -Smart]
フォーマット文字の使い方 フォーマット文字の後ろには、それを何回繰り返すかを示す数字COUNTを付けることができます。 COUNTに * を指定すると、残っているすべての要素を使います。 フォーマット文字（COUNTも含める）同士の間にはスペースを挟むことができます。 a、A、b、B、h、H以外のフォーマットは、第2引数LISTからCOUNTで指定された分の値を使います。 aやAというフォーマットに対してCOUNTを使うと、繰り返し数で示す長さの文字列となるように、必要に応じてヌル文字かスペース文字を付け足します。unpackするとき、Aは後続のスペース文字やヌル文字を取り除きますが、aはそのままにします。 同様に、bやBは、繰り返し数で示すビット長のビット列にパックします。 hやHは、そのニブル長のニブル列にパックします。 Pは、指定した長さの構造体へのポインタをパックします。実数 (f
シュワルツ変換の実行効率 - BigFatCatのブログ
続・初めてのPerl の p.113 にシュワルツ変換というものが紹介されていた。 このシュワルツ変換を使うと、sort関数の間接指定内で割高な処理（比較的多くの時間やメモリがかかる処理）をするときに実行効率がよくなるらしい。 例えば、以下の「間接指定内で割高な処理を行う」2つのソート方法では「シュワルツ変換を使ったソート」の方が実行が早くなるということだ。 シュワルツ変換を使ったソート my @output_data = map $_->[0], sort {$a->[1] と $b->[1] を使ったソート比較} map [$_, $_ の割高な処理], @input_data; 通常のソート my @output_data = sort {$a の割高な処理と $b の割高な処理 を使ったソート比較} @input_data; そこで、実際に実行速度に違いが出るのかそれぞれの方法のベ
はてなグループの終了日を2020年1月31日(金)に決定しました - はてなの告知
はてなグループの終了日を2020年1月31日(金)に決定しました 以下のエントリの通り、今年末を目処にはてなグループを終了予定である旨をお知らせしておりました。 2019年末を目処に、はてなグループの提供を終了する予定です - はてなグループ日記 このたび、正式に終了日を決定いたしましたので、以下の通りご確認ください。 終了日: 2020年1月31日(金) エクスポート希望申請期限:2020年1月31日(金) 終了日以降は、はてなグループの閲覧および投稿は行えません。日記のエクスポートが必要な方は以下の記事にしたがって手続きをしてください。 はてなグループに投稿された日記データのエクスポートについて - はてなグループ日記 ご利用のみなさまにはご迷惑をおかけいたしますが、どうぞよろしくお願いいたします。 2020-06-25 追記 はてなグループ日記のエクスポートデータは2020年2月28
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
http://www.ark-web.jp/sandbox/wiki/index.php?plagger%2Finstall
Perl - pack and unpack -
Perl FAQ - learn.perl.org