diff --git a/thinkpad/kbd_backlight.pl b/thinkpad/kbd_backlight.pl
index 2107247..fdb62cb 100755
--- a/thinkpad/kbd_backlight.pl
+++ b/thinkpad/kbd_backlight.pl
@@ -15,7 +15,6 @@ if (open(my $m, '<', $maxfile)) {
         print "Failed to read $maxfile\n";
         exit;
 }
-print STDERR "max = $max\n";
 
 if (open(my $c, '<', $current)) {
         $now = readline($c);
@@ -25,7 +24,6 @@ if (open(my $c, '<', $current)) {
         print "Failed to read $current\n";
         exit;
 }
-print STDERR "now = $now\n";
 
 if (open(my $fh, '>', $current)) {
         $new = (($now+1) % ($max+1));
@@ -36,4 +34,4 @@ if (open(my $fh, '>', $current)) {
         print "Failed to write $current\n";
         exit;
 }
-print STDERR "new = $new\n";
+#print STDERR "$new\n";