if( ref($device) eq "VirtualMachineVideoCard"){
    print "ein value eines Keys, was kein Problem weiter darstellen sollte!?";
}