my $sitelist=xmlFileData("Content", "Sitelist.txt");
  WHILE <$sitelist>;
  chomp($line);
  SWITCH:
  if ($Session->{'usrSystem'}=~$line){str.=MLX40Tutorials()")last SWITCH;}