In glibc, there is res_init function to reread resolv.conf. I'm not sure whether it's possible to call it from Perl without writing XS/Inline::C.