Файловый менеджер - Редактировать - /usr/share/webmin/lpadmin/sortdrivers.pl
Назад
#!/usr/bin/perl open(DRIVERS, "drivers"); @dr = <DRIVERS>; close(DRIVERS); @dr = sort { $a =~ /^\S+\s+(.*)/; $x = $1; $b =~ /^\S+\s+(.*)/; $x cmp $1; } @dr; open(DRIVERS, ">drivers"); print DRIVERS grep { $_ ne "\n" } @dr; close(DRIVERS);
| ver. 1.4 |
Github
|
.
| PHP 7.4.3-4ubuntu2.28 | Генерация страницы: 0.01 |
proxy
|
phpinfo
|
Настройка