把蛋糕做大

大家都有蛋糕吃
posts - 8, comments - 3, trackbacks - 0, articles - 0

2006年3月22日

perl  - MEncode  - pi  - ' $_=encode_utf8(decode(gb2312=>$_)) '  filename

转换目录下所有文件
for f in `find .`; do [ -$f&& perl -MEncode -pi -'$_=encode_utf8(decode(gb2312=>$_))' $f; done;

posted @ 2006-08-01 01:20 理想 阅读(1040) | 评论 (0)编辑 收藏

1 use Image::Magick;
2 my ($width, $height, $size, $format);
3 my $image = Image::Magick->new;
4 ($width, $height, $size, $format= $image->Ping('logo.png');
5 ($width, $height, $size, $format= $image->Ping(file=>\*IMAGE);
6 ($width, $height, $size, $format= $image->Ping(blob=>$blob);

posted @ 2006-07-14 15:34 理想 阅读(408) | 评论 (0)编辑 收藏

拨号配置:/usr/sbin/pppoeconf

连接:sudo pon dsl-provider

断开:sudo poff

posted @ 2006-03-22 19:56 理想 阅读(258) | 评论 (0)编辑 收藏