名称 gifcat.pl: GIFファイル連結ライブラリ Ver1.61 著作権 Copyright (C) 1997,2002 杜甫々 著作権は放棄しませんが、自由に使用・改造・再配布可能です。 機能 複数のGIF画像を、アニメGIFの機能をもちいて横方向に連結する、 Perlライブラリです。0.gif 1.gif 2.gif などの数字画像を横方 向にならべてカウンター画像を生成する際などに用いてください。 最新版入手先 http://tohoho.wakusei.ne.jp/wwwsoft.htm 基本的な使い方 require "gifcat.pl"; open(OUT, "> out.gif"); binmode(OUT); # MS-DOS や Windows の場合に必要です。 print OUT &gifcat'gifcat("0.gif", "1.gif", "2.gif"); close(OUT); デバッグ用(GIFの解析出力) require "gifcat.pl"; &gifcat'gifprint("0.gif"); 制限事項 ・アニメGIF同士を連結することはできません。 ・アニメGIF対応のブラウザでなければ、最初の画像しか表示されません。 ・高さの異なるGIFファイルは連結できません。 ・Netscape 6.* では、一番最初の桁がうまく表示できないことがあり ます。→ 一番最初の画像の大きさが全体と異なる場合に表示がおか しくなるという、ブラウザ側のバグが原因だと推測しています。 → Ver1.61で、Netscape 6.*のバグ回避のコードを入れました。 特許 本ライブラリは、GIF画像の生成を行いますが、GIFファイルの中の画像 ヘッダ部のみを操作し、画像データ部の圧縮・解凍を行いません。した がって、Unisys社のLZW特許には抵触しません。 更新履歴: 1997.05.03 初版。 1997.05.10 スペルミス修正。 1997.05.29 サイズの異なるカラーテーブルに対応。 1997.07.07 エラー発生時にexit()しないように修正。 1998.05.05 Trailerを持たないGIFファイルを連結できないバグを修正。 1998.05.05 横幅が256を超えるGIFの出力ができないバグを修正。 1998.05.05 gifprint()で連結結果を出力しないように修正。 1998.05.10 連結できないGIF画像があるというバグを修正。 1998.08.20 Ver1.50 変数の初期化を行うように修正。 1998.08.20 Ver1.50 透過GIFに対応。 1999.05.30 Ver1.51 動作には関係ないタイプミス修正。 1999.10.11 Ver1.52 コメントの修正 2000.05.21 Ver1.53 幅の異なるGIFの連結に対応 2000.06.04 Ver1.54 perl -wcのwarning対応 2000.06.04 Ver1.55 インタレースGIF部のコードミスを修正。 2000.09.17 Ver1.56 連続呼び出しの際のバグ修正 2000.11.28 Ver1.57 インタレースGIF部のコードミスを修正。 2001.06.17 Ver1.57a 最新版入手先などのURLを修正 2001.09.14 Ver1.58 gifcatを連続で呼び出す際の不具合修正。 2001.10.04 Ver1.59 同上。 2001.11.25 Ver1.60 gifprintの不具合修正。 2002.06.10 Ver1.61 Netscape 6.*で1桁目が表示されない問題に対応。