Searched refs:x_pretty (Results 1 – 1 of 1) sorted by relevance
71 (my $x_pretty = $x) =~ s/\n/\\n/g;73 ok $x =~ /^abc/, qq ["$x_pretty" =~ /^abc/];74 ok $x !~ /^def/, qq ["$x_pretty" !~ /^def/];77 ok $x =~ /^def/m, qq ["$x_pretty" =~ /^def/m];79 ok(!($x =~ /^xxx/), qq ["$x_pretty" =~ /^xxx/]);80 ok(!($x !~ /^abc/), qq ["$x_pretty" !~ /^abc/]);82 ok $x =~ /def/, qq ["$x_pretty" =~ /def/];83 ok(!($x !~ /def/), qq ["$x_pretty" !~ /def/]);85 ok $x !~ /.def/, qq ["$x_pretty" !~ /.def/];86 ok(!($x =~ /.def/), qq ["$x_pretty" =~ /.def/]);[all …]