minor cleanup

2026-04-20 01:16:39 +00:00 · 2017-05-31 20:28:14 -06:00
parent 9a14a108bc
commit 36032432fb
2 changed files with 1 additions and 4 deletions
@@ -1,6 +1,6 @@
 #!/usr/bin/env perl -w

-#use strict;
+use strict;

 my @titles = ();
 my $max = 0;
@@ -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);