Code snippet below:
my $r = $rt->get_results();
foreach my $port ($port1,$port2) {
print ("port: $port\n");
print ("Gen Frames : $r->{$port}-> ->{-GeneratorSigFrameCount}\n");
print ("ana frames : $r->{$port}-> ->{-SigFrameCount}\n");
}