diff --git a/process/files/intradata_get.pl b/process/files/intradata_get.pl
index 9fb0b2c..7051d65 100644
--- a/process/files/intradata_get.pl
+++ b/process/files/intradata_get.pl
@@ -74,6 +74,7 @@ sub grades_new_bonus
 	my @lines = ($args->{files}{$kfile} =~ tr/\n//);
 
 	log TRACE, $args->{files}{$kfile};
+	log TRACE, @lines;
 
 	my $value = 1;
 	# Looking for a global value