2月23日に、にあさんは書きました。 >perlから DNSを引く方法が分からないと言うことかしら? はい。 > $host = (gethostbyaddr(pack("C4", split(/\./, $addr)), 2))[0]; > >とでもすれば、$host が "meshsv14.tk.mesh.ad.jp" になっているのが分かるでしょう。 おおっ!!できました。全然勉強不足ですね=>私って。 レスありがとうございました。