Megagram-ResolveSRV version 0.01

use Megagram::ResolveSRV;

my $rsrv = Megagram::ResolveSRV->new;
my @hosts = $rsrv->resolve('xmpp-server.tcp.google.com');

use Data::Dumper;
print Dumper(\@hosts);