本連載では第一線のPerlハッカーが回替わりで執筆していきます。記念すべき第50回のハッカーは、本連載の監修を務め、数多くのモジュールをCPANにアップロードしている松木雅幸（Songmu）さんで、テーマは「Minillaを使ったモダンなCPANモジュール開発」です。 Perlで何かを開発する際には、たとえ公開する予定がなくともCPANに公開するモジュールと同じディレクトリ構成で開発するのがお勧めです。本稿ではMinillaというCPANモジュール作成のためのツールを使って、迷いなく開発を進める方法について説明していきます。 本稿で作成するサンプルのCPANモジュールは、筆者のGitHubリポジトリにてソースコードやコミットログを公開しています。また、CPAN上にも実際にリリースされています。 Minillaとは？ MinillaはCPANモジュールのオーサリングツールです。2013年に開

metacpan.org Smart::Args::TypeTinyには, default と optional というパラメータがあります. default default は, 引数が渡らなかった時のデフォルト値を指定するパラメータです. use strict; use warnings; use feature qw(say); use Smart::Args::TypeTiny qw(args); sub test { args my $arg => { isa => 'Str', default => 'bar' }; return $arg // 'undef'; } say test(arg => 'foo'); # => 'foo' say test(); # => 'bar' ( default が使われる ) say test(arg => undef); # => T

https://metacpan.org/release/Teng-Plugin-RowObjectCreationSwitcher @tsucchi さんに上げてもらったのでその話。 追記 注意 tokuhiromに意見をもらって0.02でインターフェースが変わりました。 temporary_suppress_row_objects_guard( 1 / 0 ) を新設 (dis|en)able_row_object を廃止 ガードオブジェクト受け取らないとエラーになるように 「こういう$tengみたいなグローバルなオブジェクトの内部を一時的に変えるみたいなのはやらないほうがいいですね！」 と、tokuhiromに言われており、実際そうなので、やるなら自己責任で気をつけて使いましょう。 言われてみると、$teng->suppress_row_objectsがそもそもrwなのが怖い感じがし

You signed in with another tab or window. Reload to refresh your session. You signed out in another tab or window. Reload to refresh your session. You switched accounts on another tab or window. Reload to refresh your session. Dismiss alert

はじめに 忘年会シーズンまっただ中で皆さんは毎日お酒を飲んでいることでしょうが、僕は友達が少ないため忘年会とか全然無いので財布はまだホットな状態なんですが、なぜ僕の妹は小鳩ちゃんじゃないんだっていうかそもそも妹いないしもう死ぬって感じの xaicron です。こんにちは。 そろそろ prove について簡単に説明しときますよっと。 prove のよく使うオプション prove にはいっぱいオプションがあるんですが、ここではよく使いそうなやつをピックアップして紹介しちゃいますよ！ -v, --verbose # いっぱい出力する -l, --lib # lib を INC についかする perl -Ilib 相当 -b, --blib # blib/lib とか blib/arch を INC につかする -Mblib 相当 -c, --color # カラフルになる！ MSWin32 だと

1. . Perl の勘所をマスターしよう! . コンテキストとリファレンスを我が物に! 近藤 嘉雪 @yoshiyuki kondo YAPC::Asia 2012 (2012/9/29) 近藤 嘉雪 (@yoshiyuki kondo) コンテキストとリファレンスを我が物に! YAPC::Asia 2012 (2012/9/29) 1 / 57 2. 自己紹介 近藤 嘉雪 (こんどう よしゆき) 近藤 嘉雪 (@yoshiyuki kondo) コンテキストとリファレンスを我が物に! YAPC::Asia 2012 (2012/9/29) 2 / 57 3. 自己紹介 近藤 嘉雪 (こんどう よしゆき) Twitter: @yoshiyuki_kondo 近藤 嘉雪 (@yoshiyuki kondo) コンテキストとリファレンスを我が物に! YAPC::Asia 2012 (2012

これはPerl Advent Calendar 2018　7日目の記事です。 tl;dr 先日リリースされたJSON::XS 4.0が2013年に行われたJSONの仕様変更に追随したので、decode_json($json) の結果はかならずしもリファレンスではなくなりました。encode_json($value) にもリファレンス以外の値を受け入れるようになっています。結果、JSONモジュールの挙動がバックエンドによって異なる状態になり、各地でテストがこけるなどの影響が出ました。これを受けてJSON、JSON::PP側も変更に追随しましたが、みなさまの方でも適宜ご対応をお願いします。 2018年11月16日付けでJSON::XSのバージョン4.0が出ました。3.0が出たのが2013年10月29日のことですから、5年振りの大型アップデートということになります。今回の目玉は二点。いずれもこの

id:papix です. この記事は, Perl Advent Calendar 2019の2日目の記事です. 昨日は, id:karupanerura さんの｢2019年の最先端のPerl開発ボイラープレート｣でした. qiita.com 今日は, 昨日のエントリでも触れられていたSyntax::Keyword::Tryについて, さっくりとアレコレ綴りたいと思います. Perlと例外処理 Perlで例外処理をするにあたって, 例えばJavaのようなtryやcatchといった仕組みは言語仕様として提供されていません. そのため, Perl Monger達はtry/catchのような機能を提供するモジュールを用意して対処してきました. その中でも著名なものの1つは, Try::Tinyでしょう. metacpan.org Try::Tinyを使えば, 例外(die)が起こるコードについて,

この記事は Perl Advent Calendar 2014 の 15日目 の記事です。 14日目の記事は karupanerura さんの Carton時代の必須インストールモジュール(Webアプリ編) でした。 目次 はじめに $classと$self mapの使い所 doブロック内でreturn 終わりに 明日は はじめに はじめに言っておきますが、Perlを分かってそうで分かってない人 = 僕 です。 この記事では、Perlの扱いにある程度慣れてきたけれど、実はあんまり理解せず使っています、という方が陥るであろうミスをアンチパターン形式で紹介する。と見せかけて僕の恥ずかしい失敗というか、勘違いを書いていきます。 $classと$self Perlでメソッドを定義するとき、私は全てこういう風に書き始めていました。 sub method { my $class = shift; #

Emacs、「モダン」という言葉に誘われて flymake から flycheck に乗り換えたときに Perl の @INC 周りの設定で少しがんばったのでメモ。 解決したいこと my-project/scripts/poyo.pl とかを編集しているとき、my-project/lib や my-project/local/lib/perl5（Carton でインストールしたモジュールが入ってる）は @INC に含まれていないので、例えば自分のプロジェクト内のモジュールを use MyApp; という具合で読み込もうとすると flycheck さんに怒られてしまう。これを解決したい。 解決策 解決策を探してみても、flymake の話が少々出てくるくらい。flycheck の話はなかなか出てこなかった。それでもめげずに探したところ、以下のリンクに辿り着いた。 良い感じで flycheck

speakerdeck.com 最近の便利Perl情報や好きなモジュールの話をしました。 トーク応募したときには話したかった細かい話題がいくつかあったのですが、20分では収まらなかったのもありクラスビルダやクラスローダ、バリデータ、Type::Tinyの話になりました。 トークの中で紹介した、拙作のSmart::Args::TypeTinyが結構好きで最近よく使っています。 Smart::Args::TypeTiny - We are smart, smart for you - metacpan.org 詳しい使い方やSmart::Argsと比較したときのメリットをあまり説明できなかったのですが、Smart::Args::TypeTinyについては昨年 id:papix さんが紹介している記事があります。(ありがとうございます!!!) papix.hatenablog.com 自分のトー

Perl の BEGIN 句とか use まわりでつまずくことがあまりに多かったので、Quiz形式にして知識を確認できるようにしてみました。 Quiz1〜6について、それぞれ実行結果を予想してみてください。 なお、問題によっては実行時エラーの可能性もあるので、エラーの場合は「エラー」と回答してくださいね！ それではいってみましょう。 Quiz1 BEGIN 句の問題です。 1, 2, 3 はどの順番で print されるでしょうか？ エラーの場合は「エラー」と回答してください。 これは簡単ですね！ #!/usr/bin/env perl use strict; use warnings; print 1; BEGIN { print 2; } print 3;

こんにちは、アプリケーションエンジニアの id:nanto_vi です。この記事ははてなデベロッパーアドンベントカレンダー 2015 の 2 日目です。 Perl で日時を扱うモジュールのひとつに Time::Piece があります。コアモジュールなので手軽に使えますが、Perl - Time::Piece に関するとりとめのないコト - Qiita にもまとめられているように注意すべき点も多いです。ここでは、そのような注意点をいくつか挙げていきたいと思います。 なお、以下のコードは Time::Piece 1.31 で確認しています。 タイムゾーン情報を持たない 大前提として、Time::Piece のインスタンスはタイムゾーン情報を持っていません。持っているのはローカル時間か GMT かの区別のみです。その「ローカル時間」が実際にどのタイムゾーンなのかは、環境 (環境変数 TZ の値な