タグ

ブックマーク / blog.hide-k.net (5)

  • local::libを使った非rootでのCPAN環境構築 - hide-k.net#blog

    miyagawaさんが紹介されていたlocal::libを使って非rootでのCPAN環境を作ってみました。平たく言えばさくらインターネットのレンタルサーバで一般ユーザーでCPAN環境を作ってみました。 とはいえ、多くは先人たちの otsune's FreeBSD memo :: ユーザー領域にCPANをインストールする方法 さくらインターネットでCPAN - Charsbar::Note と大差ありません。 まずはlocal::libのアーカイブを取得・解凍します。最新のバージョンは1.003001です。 wget http://search.cpan.org/CPAN/authors/id/A/AP/APEIRON/local-lib-1.003001.tar.gz tar xzvf local-lib-1.003001.tar.gz cd local-lib-1.003001 ots

  • hide-k.net#blog: 巻き込み重要

    新しい会社に入って3ヶ月が過ぎて、ようやく試雇採用期間も終わり無事正式採用されました。 周りは若い人ばっかりで、なかなか活気があるのですが残念ながら業務の仕組みややり方が古いのも、また事実。僕が思うくらいだから、結構古い。というかベンチャーにありがちな勢いで来ちゃった感じ。 一人、新しいことに敏感な方がいらっしゃるのだが、なかなか忙しい人なので周りを巻き込むまでには至ってなかった感じ。 まぁ、そこはそこ。まだ小回りが利くうちに変えちゃえってことで、勝手気ままに色々巻き込んじゃった。 IRC 元々あって、僕が来たときには結構ログ流れてたんだけど、その前は全然使われてなかった感じだった。くだらないことから何から片っ端から流し始めてマネージャーにも強制参加させたら、みんなちゃんと使うようになった。 wiki 部内wikiみたいなのが元々あったんだけど、ちょっと停滞気味な感じは否めなかったの

  • hide-k.net#blog: Catalyst::Model::AdaptorでTheSchwartzをModel化

    今さらTheSchwartzを使い始めました。 で、jobの状態を監視するWebインターフェースをCatalystで作ることになったのですが、いちいちTheSchwartzのインスタンスを作るのが面倒くさい。 でもそのためにModel作るのもアホらしい。 で、Catalyst::Model::Adaptorを使ってMyApp::Model::TheSchwartzを作ってモデルとして使うのをやってみたのでメモ。 HelperスクリプトでMyApp::Model::TheSchwartzを作成 script/myapp_create.pl model TheSchwartz Adaptor TheSchwartz 出来上がったMyApp::Model::TheSchwartzを変更 package MyApp::Model::TheSchwartz; use strict; use w

  • hide-k.net#blog: CentOSにRed5を入れてみる

    そろそろみんな飽きてきた観もあるustreamです。 で、これと同じようなサービスをやるにはFlash Media Serverが必要なんでしょうが、むちゃくちゃ高いです。 で、これとほぼ同じ機能を提供してくれる(正確にはRTMPサーバーになるんだろうか)OSS、Red5をCentOS 5に入れたので、メモ。 antのインストール makeにantを使うのでantをyumでインストール。 $ yum install ant JDKのインストール antをインストールするとjava-1.4パッケージがインストールされるけど、コンパイルと実行にはjdk1.5以上が必要なのでSunからJDK 5以上をダウンロードしてインストールしてデフォルトのVMを1.5に切り替え。 詳しくはこの辺。 JAVA_HOMEの指定をしないとコンパイルでこけるので注意。 JAVA_VERSIONの指定はしてもしなく

  • hide-k.net#blog: perlでポラロイド風に画像加工

    最近、またImageMagickをさわる機会があったので、ちまたで人気のPolaroizeと同じことがPerkMagickでできんかとこの辺を参考に試してみました。 手元にまともなImageMagickが使える公開サーバーがなかったのでスクリプトだけ。 Fedora Core 6の ImageMagick-6.2.8.0-3.fc6.1 ImageMagick-perl-6.2.8.0-3.fc6.1 で試しました。 poralize.pl use strict; use Image::Magick; my $input = 'image.jpg'; my $output = 'polaroid.jpg'; my $img = Image::Magick->new; $img->Read($input); $img->Border( width => 10, height => 1

  • 1