伝票やチケットのナンバー入れに重宝します。
従来では、本文印刷後ナンバーを刷り込んでいましたが、PODが発達した現在ではPODでの印刷が主流になりつつあります。
PODでは最初にナンバーを発生させておいて、InDesignのデーター結合させます。
その後マスターページに印刷本文を配置し印刷データーを作成します。このように二段階となるわけです。
しかし、MakeNumber2を使えばナンバーと印刷本文を一度の処理で完結できます。
完結できるという事は、ナンバーの位置がずれたりして、再処理が簡単であり、高い精度が得られます
strict; utf8; Text::CSV_XS; Jcode; Encode qw/ from_to encode decode encode_utf8 decode_utf8 /; File::Basename; #CSV拡張子のチェックに使用 Imager::Barcode128; #バーコード作成用 Imager::QRCode; #QRコード作成用 Getopt::Long 'GetOptions';
#!/bin/sh if [ $# -lt 1 ] then echo ---------------------------------------------------------------- echo Usage: MakeNumb2 -c xxxx.csv [-p zzzz.pdf省略可能] echo xxxx.csvに指示された仕様にそって印刷枚数分ナンバーを発生します echo zzzz.pdfの指示あれば下絵にします。無ければナンバーのみ echo xxxx.pdfはcsvと同じディレクトリに出力されます echo ---------------------------------------------------------------- echo ●使い方 echo ターミナルを起動して echo MakeNumb2 -c xxx.csv -p zzzz.pdfとすると作成されて同ディレクトリに作られます echo pdfとして作成されるのでそのまま印刷可能です echo "xxxは ~/Developer/source/perl/MakeNumber/++MakeNumb-sample.numbersにあります。" echo ---------------------------------------------------------------- open /Applications/Numbers.app ~/Developer/source/perl/MakeNumber/MakeNumb-Code.numbers exit 1 fi cd /Users/yuzo/Developer/source/perl/MakeNumber echo "------ printnumb221 Num QR Bar code Type ..... shell" perl /Users/yuzo/Developer/source/perl/MakeNumber/MakeNumb221.pl $1 $2 $3 $4 echo "------- end -------- shell" echo exit