Use the i modifier.

my $foo = 'BaR';
$foo =~ /bar/i;
[download]

See also perlre.

----
I wanted to explore how Perl's closures can be manipulated, and ended up creating an object system by accident.
-- Schemer

Note: All code is untested, unless otherwise stated