proc getRawTrafficVports {} {
    # Ordinary vports looks like this: ::ixNet::OBJ-/vport:1
    # For raw traffic items, vports needs to be like this: ::ixNet::OBJ-/vport:1/protocols

    set vportList [ixNet getList [ixNet getRoot] vport]
    set protocolList {}
    # Raw traffic vport format: /vport:1/protocols.  
    # Not like this ::ixNet::OBJ-/vport:1/protocols
    foreach vport $vportList {
	regexp ".*(/vport.*)" $vport - protocolVport
	lappend protocolList $protocolVport/protocols
    }
    return $protocolList
}