c4saでアプリを動かしてみるテスト用

jobs_meigen.pl

use Mojolicious::Lite;
use utf8;
use Encode;

my @jobs = (
'ハングリーであれ、バカであれ。',
'皮肉の規模も大きいですね',
'アップルのシェアは、自動車業界におけるBMWやベンツ、ポルシェよりも大きい。BMWやベンツであることの何が悪いんだ？',
'これはそもそも画期的なものを作る才能がないときついかも。',
'消費者に、何がほしいかを聞いてそれを与えるだけではいけない。完成するころには、彼らは新しいものを欲しがるだろう。',
'これはやっぱり動画で見たいですね。そんな人は一番最後に動画があります。',
'最も大事なことは自分の心に、自分の直感についていく勇気を持つことだ。心や直観はすでに、あなたが本当になりたいものを知っている。それ以外は二の次だ。',
'定義（ドグマ）にとらわれてはいけない。それはほかの人たちの考え方の結果と生きていくということだ。その他大勢の意見という雑音に、自分の内なる声を溺れさせてはいけない',
'君たちの時間は限られている。だから他の誰かの人生を生きて時間を無駄にしてはいけない。',
'死の実感が無い人ですと実践はできかねるかもしれませんね。',
'目標理解度が高ければベクトルを一致することができて、効率がいいのでしょうね。',
);

get '/' => sub {
    my $self = shift;
    $self->render(text => $jobs[int(rand($#jobs))]);
};

app->start;