$qname="_sip._udp.www.google.com"; $qname =~ s/(_sip\._udp\.)(.*)/$2/;