use Net::DNS; how to process variables from axfr??

Hi,

When I run the below script, it produces the zone file.

However if I try to read the variable $rr (eg "
foreach my $rr (@zone) {
    print("var \n$rr\n");
      $rr->print;
    }
, it produces something like Net::DNS::RR::A=HASH(0x855c45c)
How can I process this data further in an array, string or whatever??

Sample zonefile output
test.net.       300     IN      SOA     ns1.test.net. 
domainmaster.test.net. (
                                        81541426        ; Serial
                                        14400   ; Refresh
                                        1800    ; Retry
                                        3628800 ; Expire
                                        7200 )  ; Minimum TTL
test.net.       300     IN      A       195.172.54.90
test.net.       300     IN      NS      ns1.test.net.
test.net.       300     IN      NS      ns2.test.net.
test.net.       300     IN      MX      0 mail.test.net.
test.net.       300     IN      MX      10 mail1.test.net.
aktie.test.net. 300     IN      A       3.160.219.41
......

Sample script.
#!/usr/bin/perl
#

my $optie1 = $ARGV[0];
use strict;
use Net::DNS;
my $res = Net::DNS::Resolver->new;

  $res->tcp_timeout(10);
  my @zone = $res->axfr($optie1);
  if (@zone) {
    foreach my $rr (@zone) {
      $rr->print;
    }
  } else {
    print 'Zone transfer failed: ', $res->errorstring, "\n";
  }