For CROSS2014 ぶつかり稽古 ;-)
$ carton install
$ carton exec -- perl scripts/songs_data/init_songs_data.pl
$ carton exec -- perl scripts/serial_numbers/dispense_serial_numbers.pl 100
$ carton exec -- plackup
これで動くはず.
dispense_serial_numbers.pl
の引数に100って与えてますが,もしこれを省略すると100万件シリアルナンバー発行して渋いので気をつけて下さい.
まあ見ればわかると思います.
Pull-Request見てください.
MIT