open my $fh, '>', 'file.log' or die $!;
print $fh "hello world\n" or die $!;
system('rm -f file.log && touch file.log');
print $fh "hello world\n" or die $!;