+ # check if fh_out and previous fh_out has changed or not.
+ my $diff;
+ if(-f $out_file) {
+ $diff = `diff $out_file $out_file_tmp`;
+ } else {
+ $diff = "write it, it's new";#'
+ }
+ if ($diff) {
+ print "WRITING : $out_file\n";
+ unlink $out_file;
+ system("mv $out_file_tmp $out_file");
+ } else {
+ print "no changes in $out_file\n";
+ unlink $out_file_tmp;
+ }