Lines Matching refs:line
237 while (my $line = <$data>) {
238 chomp $line;
239 $line =~ s{\r\n}{\n}g; # adjust line endings
240 $line =~ s{_CA_DN}{$ca_dn}g;
241 $line =~ s{_SERVER_DN}{$server_dn}g;
242 $line =~ s{_SERVER_HOST}{$server_host}g;
243 $line =~ s{_SERVER_PORT}{$server_port}g;
244 $line =~ s{_SERVER_TLS}{$server_tls}g;
245 $line =~ s{_SERVER_PATH}{$server_path}g;
246 $line =~ s{_SERVER_CERT}{$server_cert}g;
247 $line =~ s{_KUR_PORT}{$kur_port}g;
248 $line =~ s{_PBM_PORT}{$pbm_port}g;
249 $line =~ s{_PBM_REF}{$pbm_ref}g;
250 $line =~ s{_PBM_SECRET}{$pbm_secret}g;
251 $line =~ s{_RESULT_DIR}{$result_dir}g;
253 next LOOP if $server_tls == 0 && $line =~ m/,\s*-tls_used\s*,/;
256 if ($line =~ m/,\s*-no_proxy\s*,(.*?)(,|$)/) {
260 $line =~ s{-section,,}{-section,,-no_proxy,$server_plain,} ;
262 if ($line =~ m/,\s*-proxy\s*,/) {
265 $line =~ s{-section,,}{-section,,-proxy,$proxy,};
267 $line =~ s{-section,,}{-section,,-certout,$result_dir/test.cert.pem,}
268 if $aspect ne "commands" || $line =~ m/,\s*-cmd\s*,\s*(ir|cr|p10cr|kur)\s*,/;
269 $line =~ s{-section,,}{-config,../$test_config,-section,$server_name $aspect,};
271 my @fields = grep /\S/, split ",", $line;
281 next LOOP if ($line =~ m/-server,\[.*:.*\]/ && !have_IPv6());
