Lines Matching refs:ENV
88 $ENV{$1} = $2;
94 if (exists $ENV{CONNECT_SWITCH_LOGFILE}) {
96 if (!open(STDOUT, ">>$ENV{CONNECT_SWITCH_LOGFILE}")) {
97 die "connect_switch: $ENV{CONNECT_SWITCH_LOGFILE} $!\n";
127 if (exists $ENV{CONNECT_SWITCH_PIDFILE}) {
128 my $pf = $ENV{CONNECT_SWITCH_PIDFILE};
136 delete $ENV{CONNECT_SWITCH_PIDFILE};
145 if (exists $ENV{CONNECT_SWITCH_LOOP}) {
146 my $csl = $ENV{CONNECT_SWITCH_LOOP};
165 if (! $ENV{CONNECT_SWITCH_LOGFILE}) {
170 delete $ENV{CONNECT_SWITCH_LOOP};
172 if (exists $ENV{CONNECT_SWITCH_PIDFILE}) {
192 if (exists $ENV{CONNECT_SWITCH_PIDFILE}) {
230 if (exists $ENV{CONNECT_SWITCH_LISTEN}) {
236 if ($ENV{CONNECT_SWITCH_LISTEN} =~ /^(.*):(\d+)$/) {
244 if (exists $ENV{CONNECT_SWITCH_HTTPD}) {
250 if ($ENV{CONNECT_SWITCH_HTTPD} =~ /^(.*):(\d+)$/) {
256 if (exists $ENV{CONNECT_SWITCH_BUFSIZE}) {
260 $bufsize = $ENV{CONNECT_SWITCH_BUFSIZE};
283 if (exists $ENV{CONNECT_SWITCH_ALLOWED}) {
287 @allowed = split(/,/, $ENV{CONNECT_SWITCH_ALLOWED});
310 if (exists $ENV{CONNECT_SWITCH_ALLOW_FILE}) {
312 $allow_file = $ENV{CONNECT_SWITCH_ALLOW_FILE};
323 if (exists $ENV{CONNECT_SWITCH_APPLY_VNC_OFFSET}) {
327 $apply_vnc_offset = $ENV{CONNECT_SWITCH_APPLY_VNC_OFFSET};
329 if (exists $ENV{CONNECT_SWITCH_VNC_OFFSET}) {
333 $vnc_offset = $ENV{CONNECT_SWITCH_VNC_OFFSET};
340 if (exists $ENV{CONNECT_SWITCH_VERBOSE}) {
344 $verbose = $ENV{CONNECT_SWITCH_VERBOSE};
351 if (exists $ENV{CONNECT_SWITCH_MAX_CONNECTIONS}) {
352 $cmax = $ENV{CONNECT_SWITCH_MAX_CONNECTIONS};
374 if (exists $ENV{CONNECT_SWITCH_LISTEN_IPV6}) {