sub processJobs { my $self = shift; print STDERR "$self is <@$self>\n"; #print $self print "Processing Jobs for Server Named: ", $self->{name},"\n"; }