New version after our first batch of 7 commands

andk · Apr 24, 2016 · 4a6f806 · 4a6f806
1 parent e639f7c
commit 4a6f806
Showing 1 changed file with 11 additions and 10 deletions.
diff --git a/one-off-utils/converting-m-to-f-20160424.pl b/one-off-utils/converting-m-to-f-20160424.pl
@@ -92,6 +92,7 @@ BEGIN
     chomp;
     my $csv = $_;
     next if /^\s*$/;
+    next if /^#/;
     my($m,$a,$type,$action) = split /,/, $csv;
     die "illegal type" unless $type =~ /[mfc]/;
     my $t = scalar localtime;
@@ -175,16 +176,16 @@ BEGIN
 # End:
 
 __END__
-AI::nnflex,CCOLBOURN,f,delete
-AI::NNFlex,CCOLBOURN,m,f
-
-App::GnuGet,KHAREC,f,delete
-App::Gnuget,KHAREC,m,f
-
-Authen::NTLM,BUZZ,f,c
-Authen::NTLM,NBEBOUT,m,f
-
-AutoReloader,SHMEM,m,c
+# AI::nnflex,CCOLBOURN,f,delete
+# AI::NNFlex,CCOLBOURN,m,f
+# 
+# App::GnuGet,KHAREC,f,delete
+# App::Gnuget,KHAREC,m,f
+# 
+# Authen::NTLM,BUZZ,f,c
+# Authen::NTLM,NBEBOUT,m,f
+# 
+# AutoReloader,SHMEM,m,c
 
 B::C,MICB,f,c
 B::C,RURBAN,m,f