Файловый менеджер - Редактировать - /usr/share/webmin/lpadmin/sortdrivers-by-drv.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 @dr; close(DRIVERS);
| ver. 1.4 |
Github
|
.
| PHP 7.4.3-4ubuntu2.28 | Генерация страницы: 0 |
proxy
|
phpinfo
|
Настройка