当サイトで生成している RSS(野良feed):

dtpwiki.jpで提供しているサービス:

2010.03.12

Adobe Creative Suite 5の発売日のヒントがマルチビッツに

えっ?CS5発売間近!?早めのバージョンアップがおすすめ!|Adobe(アドビ)ソフト通販 [www.multi-bits.com]

また
マルチビッツが
何か言っているのか?

そんな自虐的にならなくても……

えっ?CS5発売間近!?早めのバージョンアップがおすすめ!|Adobe(アドビ)ソフト通販 [www.multi-bits.com]

CS5の発売について?
確かにまだ正確な発表が無いけれども
いくつかのヒントは出てるよ

たとえば昨年の12月に
FLASH CS5のベータ版公開が
予定されてたんだ

結局 公開は中止になったけど
CS3とCS4の時は米国での
製品版発売の半年ぐらい前に
公開されたんだよ

過去の発売間隔から考えると
今年の年末が発売時期なんだけど
FLASHやPhotoshopの新機能の
紹介などから考えると かなり
早まって発売される可能性もあるかも

今年の夏前
とかね

Multibitscs5yosou


やたらかしこそうな英(はなぶさ)くん(液晶モニタ?)がヒントを教えてくれていますが、アップグレード前提で話す英君に人間もたじたじ、「…」と言うしかないです。

うちのサイトに張り付けている「Adobe CS4の寿命」、昨日(2010/3/11)の時点で99日ときりのいい数字になっていたわけだけれども、どうなんだろう。つまり、2010年6月18日となるかってことですね。

20100311cs5yosou
▲DTPの現場ではCS3が定番バージョンになってしまっていて不遇のCS4の寿命

なんとなくこれよりも早く発売されそうな気がしているんですけれども……

2010.03.12 午前 12:00 [DTP] | | コメント (0) | トラックバック (0)

2010.03.11

DTIのVPSがかなり安くて

DTI、4月よりクラウド/回線双方のサービスを大幅拡充! [www.dti.co.jp]

2)ServersMan機能付き10GB専用サーバーサービス「ServersMan@VPS」をご提供開始。長期ご契約者様には特別価格100円でご提供

10GBのストレージ容量と管理者権限を持った仮想専用サーバー(VPS)サービス「ServersMan@VPS」を4月下旬(予定)よりご提供開始いたします。市場価格ではメモリ容量256MB/ストレージ容量10GBの仕様のVPSサービスは月1,500円程度で提供されていますが、先日、当社グループ会社であるメディアエクスチェンジ株式会社(以下、MEX)及びフリービット株式会社が発表した仮想化サービス「MeX VDC VPS-BOX」を利用することで、業界最安値水準での月490円(税込)というお得な価格でのご提供が可能になりました。

こりゃあさくらインターネットのスタンダードプラン(月500円)より価値あるだろ。仮想サーバだから、どんだけ込み合わせるかだよなあ。

というわけでこっちの記事。

IPv6に標準対応した“仮想データセンター”サービス「MeX VDC」を発表|FreeBit [www.freebit.com]

 VPS-BOXは、仮想化プラットフォーム実装済みの物理サーバを1筐体単位で提供するサービス。1筐体あたり、256MBメモリ、10GB HDDのVPSを最大250動作させることができる。VPSサービスを行ないたいと考えるインターネットサービス事業者向けの販売を予定する。料金は、ラック設置代と共有ネットワーク利用料などを含んで月額9万9800円。

1筺体最大250台って……メモリ64GB、HDD2.5TBはいいとして、CPUどうなっとるんだ……すべての仮想マシンがすべてフルパワーで動かないからいいんだろうけれども……仮想化セミナー出た時はコア数と仮想マシン数合わせろって言っていたんだけど……

あと、エヴァまみれだったころのDTIが懐かしい。

2010.03.11 午前 07:05 [Web] | | コメント (0) | トラックバック (0)

2010.03.10

POX over HTTPって言葉は最終的にどうなったのか

REST風のAPIを作ることを説明するときに、POX over HTTPていう言葉を覚えていたもんで、

うちでいうと、
http://labo.dtpwiki.jp/edgenow/ [labo.dtpwiki.jp]
で使っているんだけども、

ともかくPOX over HTTPという使おうかと思ったけれども、RESTfulっていう言葉がある2010年だともうRESTでいいんだよね?

Web方面の情報追いきれていないなあ……

2010.03.10 午後 11:30 [Web] | | コメント (0) | トラックバック (0)

2010.03.09

instfont.info、インストフォント.jpにつながらなくなっていました。(修正済み)

がつながらなくなっていましたが直しました。

1月1日に自宅サーバつながらなくなった関係でモデム変えたらIP変わっちゃったのを直し忘れていました……

ここアクセスできないとマイクロソフトに抗議した意味が無いので、意地で維持しとります…… 安全に判定できる仕組み公式にはよ作ってほしいんだけれどもね……

2010.03.09 午後 11:16 [DTP] | | コメント (0) | トラックバック (0)

2010.03.08

Illustratorでむりくりルビ

Illustrator?InDesign? - DTP Transit [www.dtp-transit.jp]

先日、次のようなご質問をいただきました。

イラレで作成したデータを印刷したときに「ルビがずれてしまった」という問題が発生しました。

昔広報でIllustrator10でお役所とやり取りしなくちゃいけない物件があって、こうやってた。

Illustratorruby
▲ベースラインシフトとトラッキングを駆使

「takanemanaka.ai」をダウンロード

万能ではない。

あと、中黒をぶら下げにしろとか無茶な要求もあったけど、それもなんとかやってたなあ。

2010.03.08 午後 11:28 [Illustrator] | | コメント (0) | トラックバック (0)

2010.03.07

リアで「変態!!変態!!変態!!変態!!」と言われる

昨日OFF会っていうか飲み会に参加したら初対面の人に「CLさんって変態ですよねー!」「変態!!変態!!変態!!変態!!」と連呼されました。

こういうことですよね?

僕はそろそろKOTOKOの年齢が気にな

変態のお墨付きもらったってことでらぶデス4でもしようっと。

2010.03.07 午後 09:11 [DTP] | | コメント (0) | トラックバック (0)

2010.03.06

PerlでTwitterの自画像アイコンを分に応じて回転させる

飲み会用のネタ。cronに仕込んでね。あまりやりすぎると、TwitterからBANされるかも……

#!/usr/bin/perl
 
use strict;
use warnings;
use Config::Pit;
use Image::Magick;
use WWW::Mechanize;
 
my $p = pit_get( 'twitter.com@CLCLCL' );
die "not preset account data in Pit." if !%$p;
my $username = $p->{username};
my $password = $p->{password};
 
my $file = 'cl.png';
 
my $im = Image::Magick->new;
$im->Read($file);
my ( $x, $y ) = $im->Get( 'width', 'height' );
$im->Set(bordercolor=>'#FFFFFF');
my $deg = (localtime(time))[1] / 60 * 360;
$im->Rotate(degrees => $deg, crop => 0, sharpen => 1);
my ( $nx, $ny ) = $im->Get( 'width', 'height' );
$im->Crop(width => $x, height => $y,
          x => ($nx - $x) / 2, y => ($ny - $y) / 2, );
my $tmpfile = time.".png";
$im->write("png:$tmpfile");
 
my $mech = WWW::Mechanize->new();
$mech->agent_alias( 'Windows IE 6' );
 
my $res = $mech->get('https://twitter.com/settings/profile');
die if $mech->uri() ne 'https://twitter.com/login';
$mech->submit_form(
  form_number => 2,
  fields => {
    'session[username_or_email]' => $username,
    'session[password]'          => $password,
  },
  button => 'commit',
);
$mech->submit_form(
  form_number => 2,
  fields => {'profile_image[uploaded_data]' => $tmpfile, }
);
 
unlink $tmpfile;
 
exit;
 
__END__

Twitterクライアント側でアイコンキャッシュしていることも多いからあんまり意味ないかも。あと、cronに入れた場合はカレントディレクトリに注意。

2010.03.06 午前 09:01 [Perl] | | コメント (0) | トラックバック (0)

2010.03.05

PerlのWWW::Mechanizeを使って2010年3月現在のTwitterで自画像をアップロード

Net::Twitterのメソッドだと出来んようだから。

エラー処理はほとんどナシな。くじら出てても知らん。あとTwitterのHTML構造変わったら動かなくなると思うよ。注意。

Filename: updateimage.pl

#!/usr/bin/perl
 
use strict;
use warnings;
use Config::Pit;
use WWW::Mechanize;
 
my $p = pit_get( 'twitter.com@CLCLCL' );
die "not preset account data in Pit." if !%$p;
my $username = $p->{username};
my $password = $p->{password};
 
#my $file = 'rinkoangry.png';
my $file = 'cl.jpg';
 
my $mech = WWW::Mechanize->new();
$mech->agent_alias( 'Windows IE 6' );
 
my $res = $mech->get('https://twitter.com/settings/profile');
die if $mech->uri() ne 'https://twitter.com/login';
$mech->submit_form(
  form_number => 2,
  fields => {
    'session[username_or_email]' => $username,
    'session[password]'          => $password,
  },
  button => 'commit',
);
$mech->submit_form(
  form_number => 2,
  fields => {'profile_image[uploaded_data]' => $file, },
);
 
exit;
 
__END__

これ使って美人時計でも作るがいいさ! しらんけど。


ものすごく参考にした。
nDiki: Twitter のアイコンを Perl スクリプトで更新する (改) (2009-03-20) [naney.org]

2010.03.05 午前 01:49 [Perl] | | コメント (0) | トラックバック (0)

2010.03.04

FLO:Qのラブプラスウィジェットが初めて役に立ったよ

Mac起動することってあんまりなくて、起動してもすぐFusionでWindows Vistaを起動してしまうわけですけれども、今日起動したら、正月くらいに入れたラブプラスウィジェットのニュースに何やら出ていた。

Lovepluswidget
▲「ラブプラス」取扱説明書の記載に関するお詫び

リンク先はこれ

ニンテンドーDS「ラブプラス」取扱説明書の記載に関するお詫び [www.konami.jp]

特別なイベントは何度でも見ることができますが、23個までしか残せず、古い順に消えていきます。24個以上のイベントにはロックを使用することができませんのでご注意ください。

ナンテコッタイ!

ウィジェットが旬なときに自分でウィジェットエンジン作っておけば面白かったのかもなあ。Vistaガジェットとかのガイド買ったのになあ。

2010.03.04 午後 11:44 [オタ] | | コメント (0) | トラックバック (0)

2010.03.03

Perlでパスワード文字列生成にString::Randomを使ってみる

パスワードの再発行ルーチンとか、作っているのですけれども、例えば'9'と'Q'は聞き間違えるからとかいう理由で、パスワードの文字列に使いたくないっていう用件があって、そうすると、パスワードの文字列を限定して生成するっていうことになるのだけれども、これをこんな感じで作っていましたが。

#!/usr/bin/perl
 
use strict;
use warnings;
use Digest::SHA1;
 
my $salt = '3gatsu6nichihatokyodeoffkaida';
 
my $new_password = _make_password();
my $ctx = Digest::SHA1->new;
 
$ctx->add( $salt.$new_password );
my $password_digest = $ctx->hexdigest;
 
print "NewPASSWORD: $new_password\n";
print "salted_SHA1: $password_digest\n";
 
exit;
 
# パスワード生成
sub _make_password {
  my @character
      = ( 'A','C','D','F','H','K','L',
          'P','R','T','U','X','Y','4','7', );
  my $str = q();
  my $length = @character;
  for (my $i = 0; $i < 8; $i++ ) {
    my $x = int(rand $length);
    $str .= $character[$x];
  }
  return $str;
}
 
 
__END__

モジュールでString::Random使えば簡単にできることに最近気づいた!

#!/usr/bin/perl
 
use strict;
use warnings;
use Digest::SHA1;
use String::Random;
 
my $salt = '3gatsu6nichihatokyodeoffkaida';
 
my $new_password = _make_password();
my $ctx = Digest::SHA1->new;
 
$ctx->add( $salt.$new_password );
my $password_digest = $ctx->hexdigest;
 
print "NewPASSWORD: $new_password\n";
print "salted_SHA1: $password_digest\n";
 
exit;
 
# パスワード生成
sub _make_password {
  my $sr = String::Random->new;
  $sr->{A}
   = [ 'A','C','D','F','H','K','L',
       'P','R','T','U','X','Y','4','7', ];
  return $sr->randpattern('AAAAAAAA');
}
 
__END__

String::RandomはCPANからインストール。

あんまりプログラムの長さは変わらんけれども、パスワードのバリエーションがいろいろできますよね。

2010.03.03 午後 02:40 [Perl] | | コメント (0) | トラックバック (0)