From @moritz

07​:50 < cbk> rakudo​: my $searchStr = "test"; my $inputStr = "TEST"; if
($inputStr ~~ m/​:i $searchStr /) { say "Search term found in string!";}
else {say "Not found!";}
07​:50 < p6eval> rakudo 6ab741​: OUTPUT«Not found!␤»

07​:51 < cbk> rakudo​: my $searchStr = "TEST"; my $inputStr = "TEST"; if
($inputStr ~~ m/​:i $searchStr /) { say "Search term found in string!";}
else {say "Not found!";}
07​:51 < p6eval> rakudo 6ab741​: OUTPUT«Search term found in string!␤»
07​:51 * moritz_ submits rakudobug

@coke - Status changed from 'new' to 'open'

From @jnthn

On Tue Jul 13 22​:53​:22 2010, moritz wrote​:

07​:50 < cbk> rakudo​: my $searchStr = "test"; my $inputStr = "TEST"; if
($inputStr ~~ m/​:i $searchStr /) { say "Search term found in string!";}
else {say "Not found!";}
07​:50 < p6eval> rakudo 6ab741​: OUTPUT«Not found!␤»

07​:51 < cbk> rakudo​: my $searchStr = "TEST"; my $inputStr = "TEST"; if
($inputStr ~~ m/​:i $searchStr /) { say "Search term found in string!";}
else {say "Not found!";}
07​:51 < p6eval> rakudo 6ab741​: OUTPUT«Search term found in string!␤»
07​:51 * moritz_ submits rakudobug

Now​:

my $x = 'XYZ'; say 'xyz' ~~ /​:i $x/;
=> <xyz>

Tagging testneeded.

/jnthn

From @moritz

Now tested in S05-modifier/ignorecase.t

@moritz - Status changed from 'open' to 'resolved'