先日改修したpngcntrだが、ログ解析の結果がおかしかったので調べていたところ、1000件ごとの切り出しバックアップがうまくできていない事に気が付いた。
ファイルサイズがゼロだったのでclose()の前にtruncate()を入れてみたところ、ファイルサイズが正しくなったものの、ファイル内容はNULLで改修に難航。
その後もいろいろやってみても改善が見られなかったのだが、28日にもう一度みてみると期待通りに動いていた。
いろいろ弄ってたところを戻しても動くし、何かperlモジュールがupdateされた事で直ったのかな？
ちなみにこの数日の試行錯誤で導入したパッケージは以下の通り
libalgorithm-c3-perl libclass-accessor-classy-perl libclass-c3-perl libclass-c3-xs-perl libclass-default-perl libclass-inspector-perl libclass-mop-perl libclass-xsaccessor-perl libcommon-sense-perl libcompress-zlib-perl libconfig-tiny-perl libdata-optlist-perl libdata-serializer-perl libdevel-caller-perl libdevel-globaldestruction-perl liberror-perl libfile-basedir-perl libfile-bom-perl libfile-cache-perl libfile-changenotify-perl libfile-chdir-perl libfile-chmod-perl libfile-copy-link-perl libfile-counterfile-perl libfile-desktopentry-perl libfile-dircompare-perl libfile-find-object-perl libfile-find-object-rule-perl libfile-find-rule-perl libfile-find-rule-perl-perl libfile-find-rule-vcs-perl libfile-finder-perl libfile-flat-perl libfile-fnmatch-perl libfile-fu-perl libfile-homedir-perl libfile-libmagic-perl libfile-localizenewlines-perl libfile-mimeinfo-perl libfile-mmagic-perl libfile-mmagic-xs-perl libfile-modified-perl libfile-ncopy-perl libfile-next-perl libfile-nfslock-perl libfile-path-expand-perl libfile-path-perl libfile-pid-perl libfile-policy-perl libfile-pushd-perl libfile-queue-perl libfile-read-perl libfile-readbackwards-perl libfile-remove-perl libfile-rsync-perl libfile-rsyncp-perl libfile-scan-perl libfile-searchpath-perl libfile-sharedir-install-perl libfile-sharedir-par-perl libfile-sharedir-perl libfile-slurp-perl libfile-spec-perl libfile-sync-perl libfile-tail-perl libfile-temp-perl libfile-touch-perl libfile-type-perl libfile-which-perl libfilehandle-fmode-perl libjcode-pm-perl libjson-perl libjson-xs-perl liblog-trace-perl libmoose-perl libmoosex-params-validate-perl libmoosex-semiaffordanceaccessor-perl libmro-compat-perl libnumber-compare-perl libpadwalker-perl libparams-util-perl libparams-validate-perl libparse-cpan-meta-perl libprefork-perl libreadonly-perl libscope-guard-perl libstring-approx-perl libstring-bufferstack-perl libstring-crc32-perl libstring-escape-perl libstring-flogger-perl libstring-format-perl libstring-formatter-perl libstring-koremutake-perl libstring-mkpasswd-perl libstring-parity-perl libstring-random-perl libstring-rewriteprefix-perl libstring-shellquote-perl libstring-truncate-perl libsub-exporter-perl libsub-install-perl libsub-uplevel-perl libtask-weaken-perl libtest-assertions-perl libtest-classapi-perl libtest-exception-perl libtext-format-perl libtext-glob-perl libtry-tiny-perl libunicode-japanese-perl libunicode-map-perl libunicode-map8-perl libunicode-maputf8-perl libunicode-string-perl shared-mime-info
だが、この中に救世主がいたのかなぁ…と思ってもう一度削除してみたところ、やっぱりちゃんと動くね。
結局謎だらけのまま、11/16～11/26の11日分のアクセス記録が闇に消えた事に。
![[External]](/~yano/parts/extlink.png)
訃報。
