タグ

perlと*netaに関するbayashi_netのブックマーク (8)

  • 感情に訴えかけるログ、 Log::Minimal::Emotional !!!! - (ひ)メモ

    某所で 人間の脳には人の顔を識別するための特別な神経回路が最初から組み込まれていて、人の顔の違いを見分けたりというのが、他の図形よりも格段に高速に行えるようになっています。ということで、ログメッセージに顔文字を入れてみたら、なにこれすごいヽ(=´▽`=)ノ ってなったところ。 という発言をみかけたので、つくりました。 Log::Minimal::Emotional - https://gist.github.com/hirose31/4958764 「エモーショナル」はお好みなものに容易に再定義可能です。 #!/usr/bin/env perl use strict; use warnings; use utf8; use Log::Minimal::Emotional; $Log::Minimal::Emotional::EMOTION->{CRITICAL} = '⊂二二二( ^ω^)

    感情に訴えかけるログ、 Log::Minimal::Emotional !!!! - (ひ)メモ
  • ウェブリブログ:サービスは終了しました。

    「ウェブリブログ」は 2023年1月31日 をもちましてサービス提供を終了いたしました。 2004年3月のサービス開始より19年近くもの間、沢山の皆さまにご愛用いただきましたことを心よりお礼申し上げます。今後とも、BIGLOBEをご愛顧賜りますよう、よろしくお願い申し上げます。 ※引っ越し先ブログへのリダイレクトサービスは2024年1月31日で終了いたしました。 BIGLOBEのサービス一覧

    ウェブリブログ:サービスは終了しました。
    bayashi_net
    bayashi_net 2011/06/11
    sleep sum わろた
  • 初めてのPlack - すぎゃーんメモ

    初めてのnode.js - 葉っぱ日記 に便乗しまして。 Perlの世界では、2009年秋くらいから「PSGI」という仕様が作られていまして、いまやPerlでWebサーバを作る際の標準インターフェースとなっております。 PSGI/Plack - Perl Superglue for Web Frameworks and Web Servers 第1回 PSGI/Plack―フレームワークとサーバをつなぐエンジン (1):Perl Hackers Hub|gihyo.jp … 技術評論社 とりあえず、教科書どおりに簡単なWebサーバを作ってみます。 ''=~(('(').('.'^'~'^(''=='').''^'^').('='^'^'^')'^(''=='').'').((''=='').''^'='^'~').('('^'='^'.'^'^').('='^'('^'.'^(''==''

    初めてのPlack - すぎゃーんメモ
  • どんぞこ日誌(2011-01-30) Tengの素敵モジュールつくった

    * [Perl][Acme] Tengの素敵モジュールつくった nekokakさんの新しいORM、Teng(天狗 - (small|simple) DBI wrapper / ORM)を色々さわってみました。ちょうど去年の春にDBIx::SkinnyをDBICっぽくなどと、ろくでもないことをやっていましたので、今回もゴソゴソとちょっとしたモジュールを作ってみました。Acme::TengA::SchemaOnAHoleというものです。名前について説明すると、TengAのAはAdvancedのAですね。CatalystXやMooseXのようなものです。Holeというのは、Schemaモジュールに穴あけて弄くろうという心意気を表しているのですが、色々あって穴の上のSchemaになってしまいました。お察しください。簡単な使い方としては: package MyModel::Schema; use T

    bayashi_net
    bayashi_net 2011/01/30
    わろた
  • あらゆるPerlスクリプトは10種類の記号と改行だけで表現できるか? - すぎゃーんメモ

    ''!~('(?{'.('? ?{..!? } .{.(!???.~(!}{! ^^ ?.){{?})'^'{!){~(?)?.!?{!}}!~{!}?}}!{^(^ !???(.)~'^' ~~.(~?)^}^~^){}(.{ ?!^) ^!?!?(()(}?^!'^'! !}!)(({!){!({)~(. ^..({?.{)~){)(!(^ '^' )(?{!{~~{{^ }!())~{ }^!{^)^()~!}!}!^^').'})') 元来、プログラマというのは怠惰なヒトたちであり、少しでも自分の作業がラクになるように色々なプログラムを開発してきたわけでして。 プログラムを書くにしてもできるだけラクに(タイプ数を少なく)、ということで「Code Golf」なんてのが考え出されたのだと思います。 Code Golf ところで、Acme::EyeDropsという変態モジュールは「記号だ

    あらゆるPerlスクリプトは10種類の記号と改行だけで表現できるか? - すぎゃーんメモ
  • bayashi.jp

    This domain may be for sale!

  • 単語のシャッフル - みずぴー日記

    30分プログラム、その576。単語をシャッフルしてみよう。 人間は、単語の最初と最後さえ合っていれば、あとの順番はめちゃくちゃでもいいらしいです。 こちにんは みさなん おんげき ですか?  わしたは げんき です。 この ぶんょしう は いりぎす の ケブンッリジ だがいく の けゅきんう の けっか にんんげは たごんを にしんき する ときに その さしいょ と さいご の もさじえ あいてっれば じばんゅん は めくちちゃゃ でも ちんゃと よめる という けゅきんう に もづいとて わざと もじの じんばゅん を いかれえて あまりす。 どでうす? ちんゃと よゃちめう でしょ? Tumblr これおもしろい!というわけで、単語をシャッフするスクリプトを書いてみた。 使い方 $ perl shuffle.pl hoge hgoe $ perl shuffle.pl こんにちは み

    単語のシャッフル - みずぴー日記
  • 更新履歴兼雑記 - Perl記号ゴルフとAcme::EyeDrops

    ここからが題です。 Perl は頭がおかしいです。すごすぎる。この感動を伝えたいと思います。まず Perl の基からです。 Hello world! を書きましょう。 ''=~('(?{'.('[[).[|`%,,/`[/[@$'^'+)@@/^(@@@@@,@),@').'! "})')えーと。このくらいわかりますよね。これは Hello world という一番簡単なプログラムなのでわからない人はちょっとプログラムの才能が無いです。嘘ですが。 Perl では記号だけでは出力もできないかな、というような話をしていたところ、 Acme::EyeDrops の出力は記号だけで出力してるぞ、ということでした。これは見たことがあったのですが、確かに今見ると記号だけです。で、これの出力の意味を理解してたんですが、なんともすごいものでした。書いてから後で Perl ヤロウどものことだから既に常識だ

    更新履歴兼雑記 - Perl記号ゴルフとAcme::EyeDrops
  • 1