if($line =~ /^(\S+\s+\S+)/) {
    $match = $1;
}

##</code><code>##

($match) = $line =~ /^(\S+\s+\S+)/;