css splite用の1枚画像とそれに対応するCSSを作成するperl スクリプト（垂直or水平方向に任意に画像連結）

こちらのエントリーをうけて、
css splite用の1枚画像とそれに対応するCSSを作成するperl スクリプトを改良しました。

水平方向に結合したい場合は、

cat 16x16_icons.tsv | ./get_icons.pl -css=icons.css --img=icons.png

垂直方向に結合したい場合は、

cat 16x16_icons.tsv | ./get_icons.pl -css=icons.css --img=icons.png --vertical

とする。

CSSも、画像連結方向にあったCSSを吐き出す。

githubにコードをアップしました