link speed herausfinden - #52912 (Allgemeines zu Perl)

[E|B]

2005-03-26 19:06

User since
2003-08-08
2561 Artikel
HausmeisterIn

Code: (dl )

$MIB_IFROW = {
               'Mtu' => 1500,
               'InUnknownProtos' => 270,
               'OutQLen' => 0,
               'PhysAddrLen' => 6,
               'OperStatus' => 5,
               'InErrors' => 0,
               'Type' => 6,
               'Speed' => 100000000,
               'AdminStatus' => 1,
               'Descr' => 'Realtek RTL8139-Familie-PCI-Fast Ethernet-NIC - Paketplaner-Miniport',
               'InOctets' => 202461024,
               'InDiscards' => 0,
               'DescrLen' => 69,
               'Index' => 2,
               'OutOctets' => 179095440,
               'OutNUcastPkts' => 325,
               'OutUcastPkts' => 494836,
               'OutDiscards' => 0,
               'LastChange' => 25363384,
               'InUcastPkts' => 456541,
               'InNUcastPkts' => 554,
               'OutErrors' => 0,
               'Name' => '',
               'PhysAddr' => '0010dc3456dca882'
             };

speed =  100000000
Adapter Type =  'Realtek RTL8139-Familie-PCI-Fast Ethernet-NIC - Paketplaner-Miniport'

Gruß, Erik!

s))91\&\/\^z->sub{}\(\@new\)=>69\&\/\^z->sub{}\(\@new\)=>124\&\/\^z->sub{}\(\@new\)=>);
$_.=qq~66\&\/\^z->sub{}\(\@new\)=>93~;for(@_=split(/\&\/\^z->sub{}\(\@new\)=>/)){print chr;}

It's not a bug, it's a feature! - [CGI-World.de]