open(FETCHMAILRC, ">$filename") or die "can't open $filename: $!\n";
chown $uid, $gid, $filename or die "can't chown $uid.$gid $filename: $!\n";
chmod 0600, $filename or die "can't chmod 600 $filename: $!\n";
open(FETCHMAILRC, ">$filename") or die "can't open $filename: $!\n";
chown $uid, $gid, $filename or die "can't chown $uid.$gid $filename: $!\n";
chmod 0600, $filename or die "can't chmod 600 $filename: $!\n";