etc: Modernize the indenter

1 files changed, 5 insertions, 7 deletions

diff --git a/src/etc/indenter b/src/etc/indenter
index b2cc30e7cfe..49fd73fcf72 100755
--- a/src/etc/indenter
+++ b/src/etc/indenter
@@ -1,6 +1,8 @@
-#!/usr/bin/perl -w
+#!/usr/bin/perl
+use strict;
+use warnings;
 
-$indent = 0;
+my $indent = 0;
 while (<>) {
     if (/^rust: ">>/) {
         $indent += 1;
@@ -8,10 +10,6 @@ while (<>) {
         $indent -= 1;
     }
 
-    printf "%03d  ", $indent;
-    for ($i = 0; $i < $indent; $i++) {
-        printf("  ");
-    }
-    print;
+    printf "%03d  %s%s", $indent, ("  " x $indent), $_;
 }