安倍内閣不支持54％　全道世論調査、秘密保護法強行に批判 （12/17 06:10） 北海道新聞社は、特定秘密保護法が成立し、１３日に公布されたことを受け、１４、１５の両日、全道世論調査を実施した。安倍晋三内閣の支持率は４３％となり、１１月３０、１２月１の両日に行った前回調査から１５ポイントの大幅減で、昨年１２月の政権発足以来、初めて支持率が５０％を割った。不支持は１５ポイント上昇して５４％となり支持を初めて逆転した。道民に反発が強い特定秘密保護法の審議を急ぎ、衆参両院で強行可決させた姿勢に批判が集まったとみられる。 「支持しない」と答えた人に理由を聞いたところ「自民党中心の政権だから」と並んで「国会での審議の進め方が支持できない」が２４％で最も多かった。「支持する」と答えた人の理由では「これまでの政権より良い」が４１％、「経済政策に期待できる」が２５％、「外交や安全保障、教育分野の政策が

過酷な労働を強いる「ブラック企業」の疑いがある企業への厚生労働省の立ち入り調査で、全体の82%に当たる4189の企業・事業所で違法な時間外労働など労働基準関係法令の違反があったことが17日、分かった。残業や休日出勤の時間が過労死の認定基準の一つである月100時間を超えたのも730事業所に上る。違法な過重労働の事業所がまん延する実態が裏付けられた形だ。厚労省は違反があった企業に是正勧告をしており

Lite.pmを使ったメールで文字化け 海外製のプログラムを日本語対応に修正しているのですが「～」が文字化け（?）になります。 下記がコードの一部を抜粋したものです。 $message=jcode($message)->sjis; my $msg = MIME::Lite->new( Type =>'multipart/mixed', From =>$fromaddr, To =>"$to", Subject =>"$subject", Type => "text/plain; charset=\"iso-2022-jp\"", Data =>"$message" ); 「～」だけが文字化けします。 下記のように文字コードを UTF-8 にすると文字化けしませんが、 メールで UTF-8 を使うのは良くないのでしょうか。 $message=jcode($message)->utf8; my

mojoliciousのサーバー機能とテンプレート機能を組み合わせて静的HTMLを生成するためのTipsです。 ある種Middlemanより簡単です。 HTMLを簡単に生成するには「URL」と「テキスト」に構造化し、テキストを「本文」、「本文を補助するテキスト（本文途中にでるコラム、用語集、広告、レコメンド）」、「ナビゲーションなどのリンクを説明するテキスト（ナビ）」の3パターンに分類できるようにします。3パターンの「テキスト＋URL」にします。このパターンを管理出来るようにMojoliciousを使っていく準備です。 ブラウザで確認できるようにする まず静的ファイルを生成するsitemap.yamlを用意します YAMLを使っているのは誰でも簡単に入力できるからというのとMarkdownとも相性がいいからです。sitemap.yamlは作らなくてもできると思いますが、これくらいのメタデー

この前Configプラグインで使う実用的な外部設定ファイルの一例を書いた@azumakuniyukiです。 Mojoliciousで外部設定ファイルを使う方法は、僕が書いた方法以外にもゆーすけべーさんが書かれた250万ダウンロードアプリを支えるBokete.pmを覗くのような自前で実装する方法もあります。 これらの記事で紹介されている設定ファイルは、Perlの文法にしたがって記述する設定ファイルです。今日はPerl以外の文法で書ける外部設定ファイルのプラグインを紹介することにします。 Mojolicious::Plugin::JSONConfig Mojolicious::Plugin::JSONConfigはプラグインの名称どおり、JSONで記述した設定ファイルを読込めるプラグインです。このプラグインは最初からMojoliciousに含まれているので、追加でインストールする事なく使えます

今朝、といってもこれを書いているのは12日の早朝なのですが.. Mojolicious 4.60 がリリースされ CPANにおいてのリリースオーサーがMarcus Ramberg氏 になっていてちょいと驚いている僕です。まーPOD見るとProject Founderのはいつも通りのSebastian Riedel氏なので特に内紛があったとかそういうのじゃないでしょうねｗ そこらの事情に詳しい人いましたら是非Advent Calendarを書いていただきたいです。 追記 miyagawaさんからこんなツイートを頂きまして... ようはリリースオーサーが変わることは特に目新しいことじゃない！とのことですね。 @yusukebe there were released made by one of core developers in the past, nothing new. === さて、

え〜 この記事を書いている今から数えて「昨日」 ボケて に関わるメンバーで忘年会がありまして、当初はほそぼそとやっていたサービスが、例えばiOSとAndroidアプリのダウンロード数の合計が「250万」となり、大きなインパクトを持ちだしたわけで、感慨深いものがあると感じました。 さてそんなことも加味して、そのアプリにもWeb APIを提供している「バックエンド」で使っているとあるモジュールの話をします。それが Bokete.pm です。Mojoliciousで動いている部分が現状は大半なので、大抵は のように作成され、ネームスペースをこの場合 Web層 と分けているという前提で話を進めます。とすると、トップレベルである Bokete.pm には特に書くこともあまり無いように見受けられますが、ボケてのアプリでは設定のロード周りを記述しています。 猫で著名なあずまさんが Configプラグイン

この前Liteでないアプリの実用的なディレクトリ構造一例を書いた@azumakuniyukiです。 Advent Calendarの例示用にリポジトリを作って二本の記事を書いたのですが、なんとかもう一個ぐらいひねり出せそうな気がしないでもないので、昨日の記事の続きを書いてみます。 設定ファイルが読込めない? そもそもWebアプリケーションをデプロイする前にテストをしたり、あるいはステージングサーバで確認をしたり、設定ファイルがないという事態が発生してはいけないのですが、うっかり誰かが消したとか、偶然にもディスクの設定ファイルが書き込まれている部分だけが死んだ(ないやろ)とか、もしかしたらあるかもしれません。 また、ファイルがあっても、編集に失敗して設定ファイルとして有効ではない状態になる事の方が確率としては高いでしょう。昨日の記事で登場した etc/neko.conf と etc/auth

この前Liteでないアプリの実用的なディレクトリ構造一例を書いた@azumakuniyukiです。 Advent Calendarの例示用にリポジトリを作ったので、もう少しネタが絞り出せそうな気がするので、構築するWebアプリケーションで外部設定ファイルを使えるようにする話を書きます。 Mojolicious::Plugin::Config Mojoliciousをインストールすると、それに含まれるMojolicious::Plugin::Configを使うと簡単に外部設定ファイルを使う事が出来ます。勿論、プラグインを使わず自前で読込むコードを書いても外部設定ファイルは使えますが、Mojoliciousに標準で含まれているので、このプラグインを使う方が便利で合理的です。 設定ファイルを準備する 12月6日に書いたネコ管理アプリケーションの話の続きで、設定ファイルを追加する事にします。万が一

mod_perlってまだいけるの？ PlackベースのStarmanやStarlet、そしてMonocerosなどの優秀なウェブサーバ全盛時代、そしてApacheよりもNginxのほうが流行な昨今、Apache mod_perlが良い場合ってあるの？と聞かれることがあります。 mod_perl は今も開発が進められている とても安定している Apacheのノウハウがある技術者がそのノウハウを活用できる リバースプロキシをしたりしない分、 ミドルウェアとして起動されるデーモンが一種類減ることになり、ある種の案件では喜ばれる 場合がある mod_perl環境でMojoliciousアプリをデプロイする これは簡単な話で、MojoliciousはPSGI環境に対応しているので、Plack::Handler::Apache2 でデプロイしてやると良いです。 今回は Apache2.x と mod_

としてつくった時にControllerは MyApp::Web::Example.pm などのように配置されます。より細かくディレクトリを構造化したい場合にはそうじゃなくって MyApp::Web::Controller::Example.pm に置きたいかもしれませんね。そんな時はRoutingするところのnamespaceをいじります。

現時点で最新のMojolicious「 4.59 」ではCSRF対策のメソッド諸々がようやく実装されました。以下Changesより引用。 Added CSRF protection support. Added csrf_protect method to Mojolicious::Validator::Validation. Added csrf_token attribute to Mojolicious::Validator::Validation. Added csrf_token helper to Mojolicious::Plugin::DefaultHelpers. Added csrf_field helper to Mojolicious::Plugin::TagHelpers. Mojoliciousデフォルトのセッションを使うのでPlack::Middleware:

普段は主にSMTPと付き合っててHTTPとはまだそれほど親しくなっていない@azumakuniyukiです。 昨日の@dokechinさんのエントリMojoliciousのJSON出力で文字化けの最後で さて、次回はazumakuniyukiさんということで、期待高まります。 って書いてあって、ハードルが上がった気がしながら無駄に長くなった気がしないでもない12月6日金曜日の記事です。 Liteではないアプリケーション WebアプリやWebサイトを作るのはたまにある程度なのですが、その時はMojoliciousを使っています。 Mojoliciousについて検索すると、比較的Mojolicious::Liteの記事が多いように思います。今日はLiteではない、ある程度の規模のアプリケーションを作ってみるという前提で実用的なディレクトリ構造について具体的なアプリを設計する感じで書いてみます。

MojoliciousでJSON-APIを作るのは普通に行うと思いますが、 JSON文字列をHTML内に出力するというケースもあるでしょう。 そんな時に、文字化けに遭遇したのでご紹介します。 下記サンプルコードを見てください。 package MojibakeApp::Example; use Mojo::Base 'Mojolicious::Controller'; use Encode 'decode'; # This action will render a template sub welcome { my $self = shift; my $moji = {hello => "文字化け"}; my $json = $self->render( json => $moji , partial => 1); $self->app->log->debug($json); print

最近はMojoliciousも少しずつ使っています。@xtetsuji です 今回は、以前どこかの勉強会で質問に挙がったことを思い出して書いてみます。 Mojoliciousのビルトインサーバ2つ 先日の@yusukebeさんのアドベントカレンダーでは、plackupを使ってPSGIアプリとして起動する方法が解説されていましたが、Mojoliciousには最初から以下の2つのウェブサーバが同梱されています。 morbo (モーボと読むらしい) hypnotoad (ハイプノトードと読むらしい) この他にも、MojoliciousのMojo::Server::* 名前空間を見てみると、PSGIやらCGIやら、他の起動方法についてのサポートもあります。mojo help コマンドの出力も簡潔で参考になるでしょう。 morboとhypnotoadのプロセス起動方法の違い mojo generat

テンプレートのレイアウトの話 。例えば… デフォルトは2カラムで右側にサイドバー でも about ページとかは1カラムにしたい っていう要望よくあると思うんですよ。でMojoliciousの Mojolicious::Plugin::DefaultHelpers の中からヘルパーメソッドをいくつかチョイスして使えば実現可能です。ただ、ついつい分かりやすい layout と include メソッドだけを使ってこねくり回す感じでいわば強引に上記の1カラムと2カラムの切り替えを僕は以前やっていました。すると include するためのパーツをいくつも切り分けなくてはいけなくてちょっと管理が煩雑になるので最近使ってる手法を紹介します。 content メソッドと extends メソッドを使います。アプリの本体はMojolicious::Liteでこのように短く書いてみます。 #!/usr/b

すき焼きの食材を買って帰ったはいいものの突然修正しなくてはいけないコードが降ってきまして〜 自炊する時間がなくてしょうがなく 最高のラーメン を食べたゆーすけべーです。 今回はMojoliciousのセッションについてのお話。もともと備わっているMojoliciousのセッションを使うにはこのような操作をします。 #!/usr/bin/env perl use Mojolicious::Lite; app->secret('passphrase'); get '/' => sub { my $self = shift; $self->session->{count}++; $self->stash->{count} = $self->session->{count}; $self->render('index'); }; app->start(); __DATA__ @@ index.ht

URLYou can post either your article on Qiita or your blog post. About reserved postingIf you register a secret article by the day before the same day, it will be automatically published around 7:00 on the same day. About posting periodOnly articles submitted after November 1 of the year can be registered. (Secret articles can be registered anytime articles are posted.)

初級者丸出しのエントリで申し訳ありません。・・・ requireで設定ファイルを読み込ませているけれど 同じロジックで２回目読み込ませると返却値が１になってしまった。 なんでだろう。 設定ファイルの読み込みようのいいモジュールないかなーー。 いやいや、２回同じファイルを読まないようにすればいいのか。 でもそうすると動的に変更されたときに対応できないし。 use strict; use warnings; use Data::Dumper; use FindBin qw($Bin); my $conf = require "$Bin/../twittela.conf"; #うまく読めている print Dumper($conf); $conf = require "$Bin/../twittela.conf"; #1が返る print Dumper($conf); コメント、ツイートをいただ

何をやったか PerlでTDDをしたくなったのだけれど、いちいちテストスクリプトを修正毎に回すのが億劫になってしまったのでファイルを監視して勝手に回すモジュール書いた。perlにguardっぽい挙動をさせるもの。 中でやってることは簡単で、newするときに監視したいプロジェクトのrootディレクトリを指定する。startでFilesys::notify::simpleへの監視が始まる。更新されたファイルが *.t であればそのテストだけ回し、*.pl *.pmだったらワイルドに全部回す。 TDDへの意識の高みが消え失せる前に書かねばというモチベーションの元作ったのですごくシンプルなものになった（なってしまった) テストについて 基本的にテストはめんどくさい。開発より単調な作業だし時間がかかる、だからこそ開発と平行してやるべきなんだけど、それがなかなかできない。 だとすれば、テスト作成に必要

Fist of all, I'm Chinese. I found no PerlChina Advent and came here. Can here post some artices without using japanese? Seems no prohibit~OK, let's go! Rex means Remote EXecute. It's a Deployment & Configuration Management, which works like ansible, and DSL designed like puppet. Find here: http://www.rexify.org/ But today, I will show something different -- use rex to manage a vbox -- yes, just li

こんにちは。 @debug-ito です。PlackとAnyEventが好きですがautovivificationも好きです。 今回はautovivificationプラグマについて書いてみます。 検証環境 Xubuntu 12.04 32bit perl v5.14.2 (Ubuntuレポジトリに入ってるやつ) autovivification 0.12 autovivificationって？ undefの入った変数が配列やハッシュとしてdereferenceされる際に配列やハッシュオブジェクトが自動的に生成される機能です。 公式ドキュメントにはperlrefに記載があります。 例えば下のような場合、 ## 以下、全ての例でこの3行は有効とします use strict; use warnings; use Data::Dumper; my $data; $data->{foo}{bar}

こんにちは、 @debug-ito です。PlackとAnyEventが好きです。よろしくおねがいします。 今回は最近作ったものの宣伝も兼ねて、OpenShift Onlineのチュートリアル的な記事を書いてみようと思います。 OpenShift Onlineって？ https://www.openshift.com/ Red Hatが提供しているパブリックPaaSです。Google App EngineやHerokuなんかと同じような感じで、Webアプリケーションとかをホストすることができます。小規模なアプリなら無料で使えます。 OpenShift Onlineでは公式でPerlがサポートされています。使い方は @mercysluck さんの記事が参考になります。 OpenShift OnlineでMojolicious::Liteを動かしてみたい！ ですが、OpenShiftが公式でサ

この記事はPerl Advent Calendar 2013の16日目の記事です。 Test::Synopsis::Expectation Perlのモジュールを作る際に便利そうな少し変わったモジュール、Test::Synopsis::Expectationを使ってみます。 その前にテスト対象のモジュールを作ります。ひな形作成に便利なMinillaを使ってスケルトンを作成します。 $ minil new AwesomeTargetそこで出来たAwesomeTarget/lib/AwesomeTarget.pmを以下のようにいじります。 package AwesomeTarget; use strict; use warnings; sub plusplus { my ($class, $num) = @_; return ++$num; } 1; なんのことはない、ただ++するだけのクラス

このたび，Test::Synopsis::Expectationというモジュールをリリースしました． https://metacpan.org/pod/Test::Synopsis::Expectation https://github.com/moznion/Test-Synopsis-Expectation 使い方や仕組み等をid:mackee_wさんの記事で紹介していただいたので，そちらの方も併せてご覧いただくと良いと思います． SYNOPSISのコメントを使ってテストするTest::Synopsis::Expectation - ぱいぱいにっき CPANに上がっているモジュールを使う時，多くの方が何は無くとも真っ先にSYNOPSISを見て使い方をザックリ把握するかと思います．とりあえずSYNOPSISのコードをコピペしてみて，動くかどうか見てみる的な． で，SYNOPSISのコード

CMSとかBlogツールなんかで、動的生成してるけど、実際は静的配信で問題ないって場合はままあると思っていて、実際Rijiがそうなわけです。 Rijiにも静的配信機能をつけていたのですが、やっていたことは、forkして裏側でplackupして、それをwget -rでぶっこ抜くっていうだいぶピタゴラ装置っぽいことをしていたわけです。 PSGIアプリは$env渡せば適正にレスポンスが返ってくるわけで、わざわざplackupしなくてもPSGIアプリに対してwget -r的なことはできるからそういうの作るかなーみたいな話をだいぶ前に#perl_jpでしていたら、数日前にtokuhiromがApp::Wallflowerってのを見つけてきてくれて、それがまさしく求めていたものだった。 危うく車輪の再発明するところだった。#perl_jpとかでぼやいておくのも有用ですね。 てことで、Riji 0.0.

コメントは基礎的で一般的なものでありながら、「どのようなことをコメントに残すか」は経験のあるプログラマにとっても難しいもの。 この記事では、アンチパターンコメントを見ながら、どのようなコメントを残すべきかについて説明します。 by 馬場美由紀 （CodeIQ中の人） コードは機械のために、コメントは人間のために? プログラミング言語を学ぶとき、コメントは最初に習う項目のひとつです。そして、プログラムであればコメントを含んでいることが普通です。ある研究によれば、ソースコードの平均19%がコメントだそうです。 コードを書くとき、私たちは機械とコミュニケーションを取ることを意識しています。機械はコードを認識してコンパイルしたり実行してくれます。解釈できなければ教えてくれます。プログラマは、コンパイラのためにデータ型を明示するコードを書いたりもします。 一方、コメントは人間とコミュニケーションする