Mini Shell
Mini Shell
| Direktori : /usr/share/webmin/procmail/ |
| Current File : //usr/share/webmin/procmail/manual_save.cgi |
#!/usr/bin/perl
# manual_save.cgi
# Write out the config file
require './procmail-lib.pl';
&ReadParseMime();
defined($in{'data'}) || &error($text{'manual_edata'});
$in{'data'} =~ s/\r//g;
&open_lock_tempfile(FILE, ">$procmailrc");
&print_tempfile(FILE, $in{'data'});
&close_tempfile(FILE);
&webmin_log("manual");
&redirect("");