if ( lc($foo) =~ lc($bar) ) {
    ...
}