nicht <
sondern <

use warnings;
##################################################
###################### Setup #####################
##################################################

#include the list utilites for the shuffle function
use List::Util qw(first max maxstr min minstr shuffle sum);
#include the Jabber stuff
use Net::Jabber;
#include the switch statment
use Switch;

#This is the filename that contains the setup information
my $ConfigFile = "setup.ini";