gistfile1

35c35,39
<       print Data::Dumper->Dump([$entity_view]);
---
>       my $guest=$entity_view->guest if $entity_view->guest;
>       my $net=$guest->net if $guest->net;
>       foreach my $nic (@{ $net }){
>           print $nic->macAddress."\n" if $nic->macAddress;
>       }