tokuhirom blog
Blog Search when-present<#else>when-missing. (These only cover the last step of the expression; to cover the whole expression, use parenthesis: (myOptionalVar.foo)!myDefault, (myOptionalVar.foo)?? ---- ---- FTL stack trace ("~" means nesting-related): - Failed at: ${entry.path} [in template "__entry.ftlh" at line 3, column 25] - Reached through: #include "__entry.ftlh" [in template "entry.ftlh" at
Perl::Tidyで明快コーディング！ - JPerl Advent Calendar 2009
Perlのコードを書くとき、CPANモジュールを作成するとき、そして就職活動時のエントリーで課題のperlスクリプトを提出する時に超実益的で役立つ、Perl::Tidyを紹介してみます。 使い方 以下のような汚いコードがあるとします。mud10years.plとでも名付けることにします。 use strict;use warnings;my $module="Perl::Tidy";my $user= "haoyayoi";my $desc1=" is so coolist module.";my $desc2= " Lets try it!";my $deschash = {module=>"$module", desc =>$desc1. $desc2, }; print $deschash->{module}.$deschash->{desc}." by $user"; このコードを
Module::Requires で依存モジュールをきっちりチェック - JPerl Advent Calendar 2009
今月の advent calendar だけで通算27日分もの記事を書いている Yappo ですみなさんお元気ですか? なんだか hacker track が人手不足なので今日ネタを書くために昨日思いついたモジュールを CPAN にアップロードした上で二度目の参戦をします。 http://github.com/yappo/p5-Module-Requires まえおき みなさんがコードを書く上で依存モジュールの管理に悩む。なんてのは誰しもが通る道だと思います。 もうすでに Makefile.PL の中に依存モジュールを書けば、依存モジュールを全部入れてくれるので悩む事は無いと思います。 さらには、テストケースで必要な依存モジュールのチェックなども Test::Requires が登場した事により、気楽にテストする事も出来ます。 だがしかし、プラガブルなモジュールなどが含まれるディストリビュ
FormValidator::LazyWay で検証ルールをまとめよう - JPerl Advent Calendar 2009
FormValidator::LazyWay で検証ルールをまとめよう - JPerl Advent Calendar 2009 Perl に関するちょっとした Tips をのっけてみるよ。ちゃんと続くかな？ どうも、亀仙人になって鼻血ブーしたい vkgtaro です。ご機嫌いかがですか。亀仙人が最初なのかどうか知らないけど、鼻血を吹くというマンガ表現はすごく好きです。おっと、hacker track でした。 ということで僕もハッカーではないけれど、自分がメンテナンスしてるモジュールの中から一つ紹介させてもらいますね。 今日は FormValidator::LazyWay で検証ルールをまとめちゃいます。 フォームの検証 web アプリケーションを作っていると、どのページでも出てくる入力項目ってあると思います。 会員登録時のパスワード項目とログイン時のパスワード項目とユーザ情報変更時のパ
[perl] DateTime による日時処理についてのメモ
ping による疎通は確認できるのに、いざ ssh などで繋ごうとすると No route to host というエラーで即座に接続失敗し途方に暮れる場合、おそらく原因は接続先のホストの iptables によりパケットがブロックされ、到達不能を意味する ICMP パケットが返ってきたことによります。 以下のコマンドで INPUT ポリシーをチェックします。上から順にマッチさせていき、マッチし次第ジャンプして終わるので、デフォルト条件の設定されていそうな一番下の行が肝心です。 # /sbin/iptables -L --verbose を追加してブロックしているポリシーのカウンタを見ながらブロック状況を観察できます。 # /sbin/iptables -L --verbose おそらく問題となっているのは INPUT ポリシー最下行で全てのパケットにマッチするこういう行です ... -j
ゆーすけべー日記
サキとは彼女の自宅近く、湘南台駅前のスーパーマーケットで待ち合わせをした。彼女は自転車で後から追いつくと言い、僕は大きなコインパーキングへ車を停めた。煙草を一本吸ってからスーパーマーケットへ向かうと、ひっきりなしに主婦的な女性かおばあちゃんが入り口を出たり入ったりしていた。時刻は午後5時になる。時計から目を上げると、待たせちゃったわねと大して悪びれてない様子でサキが手ぶらでやってきた。 お礼に料理を作るとはいえ、サキの家には食材が十分足りていないらしく、こうしてスーパーマーケットに寄ることになった。サキは野菜コーナーから精肉コーナーまで、まるで優秀なカーナビに導かれるように無駄なく点検していった。欲しい食材があると、2秒間程度それらを凝視し、一度手に取ったじゃがいもやら豚肉やらを迷うことなく僕が持っているカゴに放り込んだ。最後にアルコール飲料が冷やされている棚の前へ行くと、私が飲むからとチ
Test::Moreでテスト事始め - JPerl Advent Calendar 2009
はじめまして。 最近Perlを始めたmyfinderです。 ほかの方が書いたCPANモジュールを紹介したりそれらを使ったTipsを書くCasual Trackということで、今回はテストに関連するモジュールについて書きます。 プログラムの「テスト」 テストを書くというのはデンタルフロスを使うようなもので、誰もが良いことだといいつつ、実際には軽視されがちだ。 なんて言われることもありますが、実際テストがないとプログラムの改修とか引き継ぎとかが非常に大変になりがちです。 また、CPANにアップされているモジュールの中には、モジュール本体よりもテストコードの量の方が多いものも多々あります。 なのでプログラムの質を保証したり、内容を的確に伝達するにはテストが欠かせないものであることは間違いないと思います。 早速使ってみる 例えば消費税の計算をしてくれるConsumptionTax::JPというモジュ
tokuhirom blog
Blog Search when-present<#else>when-missing. (These only cover the last step of the expression; to cover the whole expression, use parenthesis: (myOptionalVar.foo)!myDefault, (myOptionalVar.foo)?? ---- ---- FTL stack trace ("~" means nesting-related): - Failed at: ${entry.path} [in template "__entry.ftlh" at line 3, column 25] - Reached through: #include "__entry.ftlh" [in template "entry.ftlh" at
Encodeでラクラク日本語処理 - JPerl Advent Calendar 2009
こんにちは！ラブプラスとときメモ４の狭間で揺れ動いているxaicronです！！ 今日は日本でプログラムを書いていたら避けては通れない気がする、Encodeの話をしようと思います！ はじめに まず、この記事を読む前に、Perlのバージョンの確認をしてください。以下のようにやればバージョンが表示されます。 % perl -v ここで、5.8.1より下の数字ができてきた方は、Perlのバージョンアップをしてください。5.8.1より下のバージョンでは、Perlの内部文字コードが安定していないので、いい感じになりません。できれば5.8.8以上のバージョンを使いましょう。 それから、文字コードってなによって人も適当にWikiとかで調べてから読んだ方がいいと思います！！ Encode.pm Encodeは昔のjcode.plやJcode.pmに代わる、現在の文字コード処理のスタンダードModuleです。
Pod::PerldocJp - Charsbar::Note
Perlのドキュメントはわざわざサーバにアクセスして読むものではなく、インストールして読むものですよね？――というわけで、日本人向けに特化したperldocをつくってみました。Pod::PerldocJpをインストールすると、perldocjpというコマンドが利用できるようになります。これを使うと、 =encodingが指定されている（たいていは日本語の）PODも（端末の文字コードによらず）正しく表示できるようになります。 perlコアに付属している一部のドキュメントについてはperldoc.jpで公開されている日本語のPODをダウンロードしてきてローカルで読めるようになります。 fによるコマンド検索などにも対応していますので、コマンドラインから $ perldocjp -Jf printとタイプすれば、日本語でprintコマンドの説明が読めるようになります（perlfuncを訳してくださ
第20回 Email::Sender：メールを送信する | gihyo.jp
メール送信のあれこれ たとえばウェブアプリケーションでなにかの注文を受け取ったとき、あるいはシステム管理ツールでなにか異常を発見したとき、ユーザや管理者にメールを送れるようにしたい、というのはよくある要件です。昔はヒアドキュメントやテンプレートエンジンなどを使って送信したいメールを用意したあと、sendmailへのパイプを開いてメールを流し込んでいたものですが、いまはメールの作成から送信まで、すべてモジュールを使って実現できるようになっています。 とはいえ、需要が大きいだけにメール関係のモジュールは山のようにあります。ディストリビューション（パッケージ）の数だけで500を数えますし、メール関係の名前がついたモジュールは現在CPANにアップロードされている7万以上ものモジュールのほぼ1割を占めるほどです。これではどれを使えばよいのかわからないという声があがるのも当然でしょう。 そこで今回はP
memcachedを介して、PerlとRubyでデータをほげほげしてみる - (ﾟ∀ﾟ)o彡 sasata299's blog
2009年10月19日22:50 Perl Ruby memcachedを介して、PerlとRubyでデータをほげほげしてみる ふと思って、Ruby でデータを memcached に入れて、それを Perl から取り出せるのかな〜というのが気になったので試してみました。データの形式として、文字列、ActiveRecord、ハッシュをそれぞれ試してみます。予想では、ActiveRecord のデータはさすがに Perl では読み込めないだろうけど、それ以外は読み込めるんじゃないかなぁと。 まずは Ruby を使って memcached にデータを set します。 #!/usr/bin/ruby require 'rubygems' require 'activerecord' require 'memcache' class Hoge < ActiveRecord::Base estab
Perl で Excel を Parse する - はちゅにっき
Perl で Excel を Parse するときのお約束といえば Spreadsheet-ParseExcel http://search.cpan.org/~jmcnamara/Spreadsheet-ParseExcel-0.54/lib/Spreadsheet/ParseExcel.pm ですよね！ というわけで、今回の話題は Perl で Excel を Parse する方法について。 ただし、Excel にはイタリア語とか、フランス語とか、日本語とか。。。 とにかくイロイロな国の文字が入力されているという、稀によくある状況を想定しています。 が、ハングル文字とかキリル文字とか、アジア圏の文字全部に対応できているかは謎です。 アジアってすごいよね。。。言語的意味で。 ちなみに日本語のみの Excel では、以下のモジュールを使うと便利だそうです。 Spreadsheet-Pars
Perlで日本語(ISO-2022-JP)メールを送信(まとめ) - kopug memo
UTF-8で作成されたメール本文をMIME::Lite及びEncodeを使用してメールを送信をする。 そこで問題となってくるのが下記の3点。 １．チルダ（全角）等の文字化け（"〜 ‖ − ¢ £ ¬ "） ２．機種依存文字が含まれていた場合の対応 ３．MIME::Lite で smtp送信する場合、Return-Pathが有効にならない 1.チルダ（全角）等の文字化け（"〜 ‖ − ¢ £ ¬ "）に関する解決方法： これは有名らしいのですが、Encode::JPが採用している UnicodeConsortium の写像表 に問題があるとかで、 一部の文字が化けます。チルダとか。 しようがないので こんな風に対応しておきました。 my %map = ( "\x{ff5e}" => "\x{301c}", # 〜 (1-33, WAVE DASH) "\x{2225}" => "\x{201
はてなグループの終了日を2020年1月31日(金)に決定しました - はてなの告知
はてなグループの終了日を2020年1月31日(金)に決定しました 以下のエントリの通り、今年末を目処にはてなグループを終了予定である旨をお知らせしておりました。 2019年末を目処に、はてなグループの提供を終了する予定です - はてなグループ日記 このたび、正式に終了日を決定いたしましたので、以下の通りご確認ください。 終了日: 2020年1月31日(金) エクスポート希望申請期限:2020年1月31日(金) 終了日以降は、はてなグループの閲覧および投稿は行えません。日記のエクスポートが必要な方は以下の記事にしたがって手続きをしてください。 はてなグループに投稿された日記データのエクスポートについて - はてなグループ日記 ご利用のみなさまにはご迷惑をおかけいたしますが、どうぞよろしくお願いいたします。 2020-06-25 追記 はてなグループ日記のエクスポートデータは2020年2月28
はてなグループの終了日を2020年1月31日(金)に決定しました - はてなの告知
はてなグループの終了日を2020年1月31日(金)に決定しました 以下のエントリの通り、今年末を目処にはてなグループを終了予定である旨をお知らせしておりました。 2019年末を目処に、はてなグループの提供を終了する予定です - はてなグループ日記 このたび、正式に終了日を決定いたしましたので、以下の通りご確認ください。 終了日: 2020年1月31日(金) エクスポート希望申請期限:2020年1月31日(金) 終了日以降は、はてなグループの閲覧および投稿は行えません。日記のエクスポートが必要な方は以下の記事にしたがって手続きをしてください。 はてなグループに投稿された日記データのエクスポートについて - はてなグループ日記 ご利用のみなさまにはご迷惑をおかけいたしますが、どうぞよろしくお願いいたします。 2020-06-25 追記 はてなグループ日記のエクスポートデータは2020年2月28
第16回 Perl::Dist::Strawberry：何味のアイスクリームがお好きですか？ | gihyo.jp
今年のYAPC::Asia、いかがでしたか？ 先日開催されたYAPC::Asiaはいかがでしたか？ 筆者はあいにくそれほど多くのセッションに参加できたわけではないのですが、この連載ですでに取り上げたもの、まだ取り上げていないもの、そして前回原稿を書いたときにはまだ存在すらしていなかったものを含めて、有意義なセッションがたくさんありました。おかげさまで筆者も当面ネタに困ることはなさそうです。 とはいえ、あまりに旬なモジュールについては、情報の流れが速すぎて、のろまな筆者では追い切れませんので、今回と次回は、筆者が今年のYAPC::Asiaでもうひとつ発表しようかと思っていたネタをしっかりまとめておこうと思います。 ActivePerlの興隆 PerlはもともとUnixで使われていたさまざまなツールのよいところを集めて作られた言語です。だから、Perlのコマンドにはシェルやawk、Cに由来する
PSGI/Plackは本質・本命・本流・本気でした - Eorzea Lounge
南陽市 パチスロ 店舗 口コミ 「当時最高の女優だったシム・ウナの演技復帰を共有できることは光栄だ」と付け加えた 土岐市 パチスロ 恵比寿 マスカッツ 目 押し 2024年の横浜アリーナ公演も決定したコンサートホール勝田台スーパーときめき♡宣伝部は,ギャンブル スポーツ【ToK8.me】最大1,000 USDTまでの75％キャッシュバック⚡⚡ギャンブル スポーツ❤️K888VIP.com❤️最大1,000 USDTまでの75％キャッシュバック パチスロ 沖 ドキ 基本 八女市 パチスロ 最高 出 玉 動画 日本のアニメがさらにお得 【ディズニープラス/2月配信】クリプトスロット入金不要ボーナス 千葉県勝浦市 パチスロ 戦国乙2 リセット 国籍を超えた友情を明かす…「カップルTシャツ＆ギター」（画像提供：wowkorea） 韓国のガールズグループ「TWICE」のメンバー, パチスロ 水着 壁
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
Games-Dice-0.046
Perlゼミ(サンプルコードPerl入門)