Сверка пользователей для openvpn
systemctl enable openvpn - включает все openvpn.conf
/etc/openvpn/server/users
login:pass:+:
----
#!/usr/bin/perl -t
use strict;
my $server = "users";
my $status = "0";
my @z= localtime(time);
my $hou = $z[2];my $min = $z[1];my $sec = $z[0];my $day = $z[3];my $mon = $z[4];
if (length $z[2] eq 1) {$hou = "0".$hou;}
if (length $z[1] eq 1) {$min = "0".$min;}
if (length $z[0] eq 1) {$sec = "0".$sec;}
if (length $z[3] eq 1) {$day = "0".$day;}
if (length $z[4] eq 1) {$mon = "0".$mon;}
my $time = $hou.
systemctl enable openvpn - включает все openvpn.conf
/etc/openvpn/server/users
login:pass:+:
----
#!/usr/bin/perl -t
use strict;
my $server = "users";
my $status = "0";
my @z= localtime(time);
my $hou = $z[2];my $min = $z[1];my $sec = $z[0];my $day = $z[3];my $mon = $z[4];
if (length $z[2] eq 1) {$hou = "0".$hou;}
if (length $z[1] eq 1) {$min = "0".$min;}
if (length $z[0] eq 1) {$sec = "0".$sec;}
if (length $z[3] eq 1) {$day = "0".$day;}
if (length $z[4] eq 1) {$mon = "0".$mon;}
my $time = $hou.