if ( $line =~ /^\S/ && $line =~ /XY/ ){ ... }