Some more errorhandling

1 files changed, 6 insertions, 1 deletions

diff --git a/stats.pl b/stats.pl
index 44cf402..18582eb 100755
--- a/stats.pl
+++ b/stats.pl
@@ -34,7 +34,12 @@ sub in_array {
 my $group_info = {};
 my @group_names = ();
 
-my @content = split /^-+$/m, get($score_url);
+my $content = get($score_url);
+if (!defined($content)) {
+	print STDERR "Could not fetch scoreboard!";
+}
+
+my @content = split /^-+$/m, $content;
 shift @content;
 
 for my $section (@content) {