X-Git-Url: https://www.fi.muni.cz/~kas/git//home/kas/public_html/git/?a=blobdiff_plain;f=SCX%2FLogReader.pm;fp=SCX%2FLogReader.pm;h=26aaaaaa2c01d427cba57cd898d6793a1863eddf;hb=8672b2c1cde62799a0ae1fb5431ae898ad0bdab0;hp=78d2b50768c61a8414f8ea24a8c6eac4244772cf;hpb=62677f2732a735eb0ba09d6d5d8af6bdd55fdadb;p=slotcarman.git

diff --git a/SCX/LogReader.pm b/SCX/LogReader.pm
index 78d2b50..26aaaaa 100644
--- a/SCX/LogReader.pm
+++ b/SCX/LogReader.pm
@@ -29,7 +29,10 @@ sub get_data {
 	my ($line, $l_time, @data);
 	do {
 		$line = <$fh>;
-		return undef if !defined $line;
+		if (!defined $line) {
+			print STDERR "End of the log file reached.\n";
+			return ();
+		}
 
 		chomp $line;
 		$line =~ s/\A\s+//xms;
@@ -37,7 +40,10 @@ sub get_data {
 		($l_time, @data) = split(/\s+/, $line);
 	} while ($l_time < $self->{begin_time});
 
-	return undef if $l_time > $self->{end_time};
+	if ($l_time > $self->{end_time}) {
+		print STDERR "Requested end time reached.\n";
+		return ();
+	}
 
 	return ($l_time, map { hex $_ } @data);
 }