Handle hostnames with upper-case letters
[webmin.git] / bandwidth / rotate.cgi
1 #!/usr/local/bin/perl
2 # Run rotate.pl now
3
4 require './bandwidth-lib.pl';
5 &ui_print_header(undef, $text{'rotate_title'}, "");
6
7 print "<b>$text{'rotate_doing'}</b>\n";
8 print "<pre>";
9 open(OUT, "$cron_cmd 2>&1 |");
10 while(<OUT>) {
11         print &html_escape($_);
12         }
13 close(OUT);
14 print "</pre>\n";
15 print "<b>$text{'rotate_done'}</b><p>\n";
16
17 &webmin_log("rotate");
18 &ui_print_footer("", $text{'index_return'});
19