Perlのコード整形ツールPerltidyを導入する - Qiita
# basic option -enc=utf8 # 文字コードUTF-8(しかしwarning出る) -ole=unix # 改行は LF -i=4 # スペース4つ -l=150 # 1行の長さが150文字以内に収まるようにする --check-syntax # 整形後 perl -c -T でチェック # code indentation control --closing-token-indentation=1 # 配列指定時などに、終了カッコを開始と同じ位置までインデント --nooutdent-long-quotes # インデントされ過ぎた文字列があっても引き戻して来ない --nooutdent-long-lines # インデントされ過ぎた行があっても引き戻して来ない # whitespace control --nospace-for-semicolon # forループ
『ActivePerlにCPANやPPMでモジュールを導入するためのTips』
PerlをWindowsのローカル環境下で利用するのに便利なActivePerlにはPPMという独自のモジュールを追加する機能があり、Perl自体にもCPANという巨大なアーカイブがあって、通常であればモジュールの導入にそれほど苦労することはないのだが、半面これらにないものをインストールしようとすると、ググッてもLinuxと解説が混在していたりしてなかなか調べるのにも苦労する。先日もWWW::MechanizeというWebサイトとのやりとりを自動化するPerlモジュールのテストをしようとインストールを試みたのだが、結果的にとんでもなく面倒なことになってしまった。 ・CPAN(Comprehensive Perl Archive Network)とは？ Perlのライブラリやモジュールなどを集めた巨大なアーカイブ。簡単に言えばPerl開発者がモジュールを容易に入手できるようにしてくれるもの。
Perlでテンプレートエンジンを作ってみた！
ソースはこちら ソースは「こちら」にあります。 テンプレートエンジンを作るまでの経緯 元々Javaのエンジニアだったので、テンプレートエンジンは 使った事はあったのですが、PHPを使い出して５年位、Smartyの使い方すら知らないｗ てか、PHPでテンプレートエンジンの重要性をそれ程感じてなかった。 前の仕事でちょっとテンプレートエンジンが欲しくなった。 テンプレートエンジンが欲しくなった理由 プログラムを組む人が、周りにいない仕事環境・・・。 過去のプログラムはHTMLを分割してプログラムの至る所に配置されている ライトないい感じのテンプレートエンジンがなかった 唖然とした、プログラム出来る人がほぼ０なのになんでプログラムの中にHTMLが埋めこまれているの？？？ これじゃあデザインの変更すら用意に出来ない！！ 普通プラグラマでも、こんなプログラム怖くてデサイン変更できない。 ということで
HTTP クライアントを作ってみよう(6) - Digest 認証編 -
Digest 認証 (ダイジェスト認証) 前ページでは Basic 認証を紹介し、セキュリティ面で問題があることを示しました。 その欠点を解消したのが Digest 認証です。 以下の URL では Digest 認証を行っています。 ブラウザから操作する分には Basic 認証と区別が付かないでしょうが、 認証の仕組みはちょっと複雑になっています。そのかわり、 ネットワーク上を流れるパケットを覗き見られても、パスワードがばれることはありません。 以下、仕組みを簡単に説明します。 「メッセージダイジェスト」の意味がよくわからなければ、暗号化のお話 (3) を参照してください (「ハッシュ」と「メッセージダイジェスト」は同じものと考えてください)。 まず、あらかじめサーバ側にパスワードの MD5 メッセージダイジェストを保存しておきます (ユーザ登録に相当)。 クライアントが Digest
PerlでSQLiteのUTF8を自動的に扱う - Qiita
タイトルの日本語に違和感があるが、気にしない方向で。 sqlite_unicode を指定するだけ。 DBD::SQLite - Self-contained RDBMS in a DBI Driver - metacpan.org https://metacpan.org/pod/DBD::SQLite use strict; use warnings; use DBI; use utf8; use open IO => qw/ :encoding(utf8) :std /; my $dbh = DBI->connect("dbi:SQLite:dbname=test.db"); $dbh->{sqlite_unicode} = 1; # important! $dbh->{AutoCommit} = 0; #initdb($dbh); $dbh->do(q{CREATE TABLE I
utf8プラグマ使用時の文字列のバイト数の取得方法 - ちゃまぐの備忘録
bytesプラグマを使うことで解決する。 （11/02/12）追記しました 何もせずに length をしてみると。 use strict; use warnings; use utf8; my $str = "あいうえお"; print length $str,"\n"; 結果は文字数。 5 以下の用に bytesプラグマを使うことで、バイト数を取得できる。 use strict; use warnings; use utf8; my $str = "あいうえお"; { use bytes; print length $str,"\n"; } 結果は、バイト数 15 ブレースで囲むのは、bytesの効果が及ぶ範囲をレキシカルスコープに限定するため。 bytesは何をやってくれるのかというと… use bytes プラグマはそれの現れたレキシカルスコープの残りで文字セマンティクスを無効化し
@INC にみる Perl のやりかたがいっぱい - Articles Advent Calendar 2010 Casual
こんにちは。最近は PHP ばっかり書いている、永遠の Perl 初心者 hatyuki です。 とつぜん質問ですが、みなさんが最も多くみている Perl のエラーはなんですか？ 自分の場合は、う〜ん。。。 Can't locate Hoge.pm in @INC (@INC contains: ~~~~ .). BEGIN failed--compilation aborted. かな？いつまでも進歩がないのが伺えますね！ 皆さんご存知の通り、このエラーは "@INC" で指定されたディレクトリの中にモジュールが見つからなかった場合に発生するエラーです。つまり、モジュールをインストールし忘れているか、モジュールがどこに置いてあるのかを適切に設定していないか、の (およそ) どちらかですね。 さてさて、Casual Perler な皆さんは、このエラーを回避するためにどんな方法を使って @
perldoc.jp
このサイトは Perl の公式ドキュメント、モジュールドキュメントを日本語に翻訳したものを表示するサイトです。 サイト内の翻訳データは、有志が翻訳しているperldoc-jp/translationから取得しています。 最近の更新 / RSS commitログから最新の50件を取得しています。稀に翻訳者とcommitした人が違う場合があります。また、修正のcommit、登録しただけで未翻訳のものも含まれる場合があります。 2024-02-04 github.com ppc0018-module-true / melonsode 2024-02-03 Data::Dumper Dumper(2.183) / melonsode 2024-01-25 github.com ppc0016-indexed-builtin / kobaken 2024-01-08 perlclassguts(5.
Perlソースを2つのファイルに分ける
2つ以上のCGIファイルを使う方法を教えてください。 例えば、 #!/usr/bin/perl (1.cgi) print "Content-type: text/html\n\n"; print '<html><body>'; $t1 = 'abcd'; $t2 = 'EF'; $t1 = &fnc($t1,$t2); sub fnc{ $s1 = @_[0]; $s2 = @_[1]; return $s1.$s2; } print $t1; print '</html>'; このソースの 'abcd' (2.cgi) と $t2 = 'bc'; (3.cgi) と sub fnc{ (4.cgi) $s1 = @_[0]; $s2 = @_[1]; return $s1.$s2; } の3つのタイプを外部ファイルとして、全部で4つのCGIに したいと思っていますが、可能か不可能か、可
Perlでファイルをバイナリで読む - Qiita
2017/07/03 binmodeを追加。 open my $fh, <:rawも同等。binmode($fh)なら過去のPerlとも互換がある。 テキストファイルを特に意味はないけどバイナリで読む方法。 画像ファイルとかの解析なら役に立つ。 まずは普通にテキストファイルを読む $ cat test1.pl #!/usr/bin/perl use strict; use warnings; my $file = $0; # 自分自身を読む open my $fh, "<", $file or die $!; binmode($fh); while (my $row = <$fh>) { print "read:" . $row; } close $fh; $ perl test1.pl read:#!/usr/bin/perl read:use strict; read:use warn
perlでエクセルを読む :: ひまつぶし雑記帖
» Kindle» iBooks» kobo» B.W.300円» Kindle» iBooks» kobo» B.W.200円» Kindle» iBooks» kobo» B.W.0円» Kindle» iBooks» kobo» B.W.200円» Kindle» iBooks» kobo» B.W.200円» Kindle» iBooks» kobo» B.W.490円» Kindle» iBooks» kobo» B.W.200円» Kindle» iBooks» kobo» B.W.300円» Kindle» iBooks» kobo» B.W.300円» Kindle» iBooks» kobo» B.W.200円» Kindle» iBooks» kobo» B.W.100円» Kindle» iBooks» kobo» B.W.600円» Kindle» iBooks»
かんたんEPUB3作成easy_epub :: ひまつぶし雑記帖
» Kindle» iBooks» kobo» B.W.200円» Kindle» iBooks» kobo» B.W.100円» Kindle» iBooks» kobo» B.W.0円» Kindle» iBooks» kobo» B.W.300円» Kindle» iBooks» kobo» B.W.490円» Kindle» iBooks» kobo» B.W.250円» Kindle» iBooks» kobo» B.W.600円» Kindle» iBooks» kobo» B.W.400円» Kindle» iBooks» kobo» B.W.450円» Kindle» iBooks» kobo» B.W.200円» Kindle» iBooks» kobo» B.W.100円» Kindle» iBooks» kobo» B.W.200円» Kindle» iBooks»
Announcing Perl 7
Announcing Perl 7 Jun 24, 2020 by brian d foy image credit: Darren Wood, “7”, on Flickr. This morning at The Perl Conference in the Cloud, Sawyer X announced that Perl has a new plan moving forward. Work on Perl 7 is already underway, but it’s not going to be a huge change in code or syntax. It’s Perl 5 with modern defaults and it sets the stage for bigger changes later. My latest book Preparing f
(Perl) MP3::Tag を用いた ID3v2タグの読み取り・書き込み (r271-635)
#!/usr/bin/perl use warnings; use strict; use MP3::Tag; my $mp3 = MP3::Tag->new('test.mp3') or die; $mp3->get_tags() or die; if (exists $mp3->{ID3v2}){ my $id3v2 = $mp3->{ID3v2}; # ID3よりタグを読み込む my $title = $id3v2->get_frame('TIT2'); my $artist = $id3v2->get_frame('TPE1'); my $album = $id3v2->get_frame('TALB'); my $year = $id3v2->get_frame('TYER'); my $track = $id3v2->get_frame('TRCK'); my $genre =
10年でどう変わった? はてなブックマークでのPerlの使い方
計算ファースト vs. 型ファースト / Computation First vs. Type First
第57回 自作ツールによる日常業務効率化―初歩的なコードだけで身近な問題を解決！（1） | gihyo.jp
本連載では第一線のPerlハッカーが回替わりで執筆していきます。今回のハッカーは非エンジニアとして普段からプログラミング情報を発信しているnote103こと門松宏明さんで、テーマは「自作ツールによる日常業務効率化」です。 本稿のサンプルコードは、WEB+DB PRESS Vol.112のサポートサイトから入手できます。 簡単なツールで日々を効率化する 筆者は昨年までフリーランスの編集者として活動していましたが、現在はIT企業のカスタマーサポートとして働いています。その一方で、数年前にPerlのプログラミングに出会って以来、Perlを使って自分のためのツールをたくさん作ってきました。本業のプログラマーのように大規模なプログラムや本格的な手法は扱えませんが、基礎的な構文を組み合わせるだけでも驚くほど多様なプログラムを作れることを日々実感しています。 Perlは今なお時代とともに着実な進化を遂げ
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
Win32::ODBC (Getting Type/Size of a field) - Perl - Tek-Tips
PerlからODBC経由でデータベースと接続するには
Perlゼミ|Perlの基礎をインストールからサンプルで丁寧に解説
「Perl 7」が発表 ～来年にも四半世紀ぶりのメジャーバージョンアップへ／「Perl 5」は長期メンテナンスモードとしてサポート
