diff options
author | 2016-05-03 19:13:04 +0000 | |
---|---|---|
committer | 2016-05-03 19:13:04 +0000 | |
commit | f8f8530c5d69c4296688ec64f43be06dc9d09c3a (patch) | |
tree | 308432d98dc3fd4b52922e0edf8df9675b461505 /regress/sys/kern/sosplice/Remote.pm | |
parent | listen directive may use a table for authentication, to make this work the (diff) | |
download | wireguard-openbsd-f8f8530c5d69c4296688ec64f43be06dc9d09c3a.tar.xz wireguard-openbsd-f8f8530c5d69c4296688ec64f43be06dc9d09c3a.zip |
Fix some Perl statements perlcritic was bitching about: Variable
declared in conditional statement.
Diffstat (limited to 'regress/sys/kern/sosplice/Remote.pm')
-rw-r--r-- | regress/sys/kern/sosplice/Remote.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/regress/sys/kern/sosplice/Remote.pm b/regress/sys/kern/sosplice/Remote.pm index 293fef26be2..a5c4f9e33ea 100644 --- a/regress/sys/kern/sosplice/Remote.pm +++ b/regress/sys/kern/sosplice/Remote.pm @@ -1,4 +1,4 @@ -# $OpenBSD: Remote.pm,v 1.3 2015/06/25 19:29:57 bluhm Exp $ +# $OpenBSD: Remote.pm,v 1.4 2016/05/03 19:13:04 bluhm Exp $ # Copyright (c) 2010-2014 Alexander Bluhm <bluhm@openbsd.org> # @@ -60,7 +60,7 @@ sub child { my $self = shift; print STDERR $self->{up}, "\n"; - my @opts = split(' ', $ENV{SSH_OPTIONS}) if $ENV{SSH_OPTIONS}; + my @opts = $ENV{SSH_OPTIONS} ? split(' ', $ENV{SSH_OPTIONS}) : (); my $dir = dirname($0); $dir = getcwd() if ! $dir || $dir eq "."; my @cmd = ("ssh", "-n", @opts, $self->{remotessh}, "perl", |