|
|
@ -2,7 +2,7 @@ |
|
|
|
{ |
|
|
|
{ |
|
|
|
|
|
|
|
|
|
|
|
my $tunMtu = ${'openvpn-routed'}{Mtu} || ''; |
|
|
|
my $tunMtu = ${'openvpn-routed'}{Mtu} || ''; |
|
|
|
my $fragment = ${'openvpn-routed'}{Fragment}; |
|
|
|
my $fragment = ${'openvpn-routed'}{Fragment} || ''; |
|
|
|
my $cipher = ${'openvpn-routed'}{Cipher} || ''; |
|
|
|
my $cipher = ${'openvpn-routed'}{Cipher} || ''; |
|
|
|
my $redirectGW = ${'openvpn-routed'}{RedirectGateway} || ''; |
|
|
|
my $redirectGW = ${'openvpn-routed'}{RedirectGateway} || ''; |
|
|
|
my $proto = ${'openvpn-routed'}{Protocol} || 'udp'; |
|
|
|
my $proto = ${'openvpn-routed'}{Protocol} || 'udp'; |
|
|
@ -32,7 +32,7 @@ else{ |
|
|
|
} |
|
|
|
} |
|
|
|
} |
|
|
|
} |
|
|
|
|
|
|
|
|
|
|
|
if (($proto eq 'udp') && ($fragment ne '')){ |
|
|
|
if (($proto eq 'udp') && ($fragment =~ /^\d+$/)){ |
|
|
|
$OUT .= "fragment $fragment\n"; |
|
|
|
$OUT .= "fragment $fragment\n"; |
|
|
|
} |
|
|
|
} |
|
|
|
$OUT .= "mssfix\n"; |
|
|
|
$OUT .= "mssfix\n"; |
|
|
|