+ my $newmtime=(stat("${outdir}/${hostname}.${var}.long.png.work"))[9];
+ if ($newmtime != $mtime) {
+ copy("${outdir}/${hostname}.${var}.long.png.work", "${outdir}/${hostname}.${var}.long.png.new");
+ rename("${outdir}/${hostname}.${var}.long.png.new", "${outdir}/${hostname}.${var}.long.png");
+ }