sub visitLink {
 print $Zeilen[1];
 $mech->get( $Zeilen[1]);
   # print "You could click on\n";
   # for my $el ($mech->clickables) {
   #     print $el->{innerHTML}, "\n";
   # };
$mech->click({xpath => '//a[text()="Verfügbarkeit in Echtzeit"]',synchronize =>0 });
}