Cisco Partner Education website. Негодования псто!

Моим основным браузером уже давно является Chrome. Периодически попадаются компании (в основном большие и старые), которые все еще делают сайты ориентируясь только на IE. Это выглядит еще хуже, если учесть, что часто это IT компании, среди клиентов которых процент использования IE ниже, чем в общем по интернету.
Сайт Cisco Partner Education нормально работает ТОЛЬКО в Internet Explorer под Windows. Возможно под Firefox на винде тоже работает, не проверял. Но на Ubuntu заставить его работать как надо не смог. Сначала думал, что все проблемы отображения и запуска лекций решит Firefox, но с его помощью нельзя запустить финальный экзамен курса Small Business Specialization - Engineer, точнее нельзя зайти на страницу экзамена, сам он сдается через VUE.
В итоге сайт работает только в Windows под VirtualBox.
Я негодую!

One-way traffic. Extreme

Технологии: udld, bfd
Насколько я понимаю Extreme пока (12.5.3) может bdf только для MPLS и static route.

С нулевым знанием perl разбираем конфиг свитча в xml (copy-paste)

Выдираем элементы из XML конфига, предварительно слитого по tftp. Это код на момент самого начала изысканий, но думаю пригодится в будущем.

#!/usr/bin/perl

use XML::Twig;


my $catbuf = ''; #buffer, helps to format string, to make "table"

#my $itembu = '';


my $twig = new XML::Twig( TwigHandlers => {

"xos-configuration/xos-module-vlan/vlan/tag" => \&tag, #path to data in XML XOS config file

"xos-configuration/xos-module-vlan/vlan/name" => \&name,

#"xos-configuration/xos-module-eaps/eapsDomainMbrVlan/memberVlan" => \&name,

#"xos-configuration/xos-module-eaps/eapsDomainMbrVlan/domainName" => \&domain,

#"xos-configuration/xos-module-vlan/vlanPort/vlanName" => \&name, #path to data

#"xos-configuration/xos-module-vlan/vlanPort/taggedPorts" => \&ports,

});


$twig->parsefile( shift @ARGV );


# Vlan name and tag

sub name {

my( $tree, $elem ) =@_;

$catbuf = "" . $elem->text . " "; #make "table": vlan-name [tab] vlan-tag

}


sub tag {

my( $tree, $elem ) =@_;

$catbuf .= "" . $elem->text . "\n";

print $catbuf;

}

#-----------------------------



#sub domain {

# my( $tree, $elem ) =@_;

# $catbuf .= "" . $elem->text . "\n";

# print $catbuf;

#}



# Tagged ports data

#sub name {

# my( $tree, $elem ) =@_;

# $catbuf = "" . $elem->text . " ";

#}


#sub ports {

# my( $tree, $elem ) =@_;

# $catbuf .= "" . $elem->text . "\n";

# print $catbuf;

#}

OSPF Cost

На свитчах extreme summit по sh iproute кост префикса показывается таким, каким пришел от соседа, без учета коста интерфейса, через который пришел префикс.