if ( $value =~ /true/i ) #### if ( index( lc $value, "true" ) >= 0 )