parent
1c4fd9b25d
commit
253bbb8e2b
@ -9,6 +9,9 @@ use Getopt::Long qw(:config gnu_getopt);
|
|||||||
|
|
||||||
my $socat = '@socat@/bin/socat';
|
my $socat = '@socat@/bin/socat';
|
||||||
|
|
||||||
|
# Ensure a consistent umask.
|
||||||
|
umask 0022;
|
||||||
|
|
||||||
# Parse the command line.
|
# Parse the command line.
|
||||||
|
|
||||||
sub showHelp {
|
sub showHelp {
|
||||||
|
Loading…
x
Reference in New Issue
Block a user