if ( lc($foo) eq lc($bar) ) { ... }