diff --git a/qrcodes.pl b/qrcodes.pl
index 5a2ada4..58e1ea8 100755
--- a/qrcodes.pl
+++ b/qrcodes.pl
@@ -1,6 +1,6 @@
 #!/usr/bin/env perl -w
 
-#use strict;
+use strict;
 
 my @titles = ();
 my $max = 0;
diff --git a/titles.pl b/titles.pl
index 8c2ac3f..b6f0b53 100755
--- a/titles.pl
+++ b/titles.pl
@@ -6,8 +6,6 @@ my @titles = ();
 my $max = 0;
 my $s = 1;
 
-#open(LINKS,"links.sort.html") || die;
-
 print "first:\n";
 
 while(<>)
@@ -28,6 +26,5 @@ foreach(@titles) {
 	printf("s%03d:\t.asciiz\t\"%-${max}s\"\n",$s++,$_);
 }
 
-#close(LINKS);