if ($line =~ /abcd/i) {