Files
webmin/servers/index-json.cgi
2022-06-30 13:08:38 +03:00

13 lines
272 B
Perl
Executable File

#!/usr/local/bin/perl
# Return a list of other Webmin servers as JSON
use strict;
use warnings;
no warnings 'redefine';
no warnings 'uninitialized';
require './servers-lib.pl';
# Get servers and apply search
my @servers = &list_servers_sorted(1);
print_json(\@servers);