Lines Matching refs:qr
41 like($Config{ivsize}, qr/^(4|8)$/, "ivsize is 4 or 8 (it is $Config{ivsize})");
45 like($Config{byteorder}, qr/^(1234|4321|12345678|87654321)$/, "byteorder is 1234 or 4321 or 12345678 or 87654321 (it is $Config{byteorder})");
65 like(Config::myconfig(), qr/osname=\Q$Config{osname}\E/, "myconfig");
66 like(Config::config_sh(), qr/osname='\Q$Config{osname}\E'/, "config_sh");
68 qr/^c.*?=/, 'config_re' );
82 like($out1, qr/^cc='\Q$Config{cc}\E';/, "config_vars cc");
83 like($out2, qr/^d_bork='UNKNOWN';/, "config_vars d_bork is UNKNOWN");
89 like($@, qr/Config is read-only/, "no STORE");
95 like($@, qr/Config is read-only/, "no DELETE");
101 like($@, qr/Config is read-only/, "no CLEAR");