summaryrefslogtreecommitdiffstats
path: root/korn/kconf_update/korn-3-5-metadata-update.pl
diff options
context:
space:
mode:
Diffstat (limited to 'korn/kconf_update/korn-3-5-metadata-update.pl')
-rw-r--r--korn/kconf_update/korn-3-5-metadata-update.pl43
1 files changed, 0 insertions, 43 deletions
diff --git a/korn/kconf_update/korn-3-5-metadata-update.pl b/korn/kconf_update/korn-3-5-metadata-update.pl
deleted file mode 100644
index 95723c4ee..000000000
--- a/korn/kconf_update/korn-3-5-metadata-update.pl
+++ /dev/null
@@ -1,43 +0,0 @@
-my $input;
-my $group;
-my $auth = "";
-my $tls = "";
-my $metadata = "";
-
-while( $input = <STDIN> )
-{
- chop $input;
- if( $input =~ /^\[.*\]$/ )
- {
- if( $metadata )
- {
- print "[$group]\n";
- print "metadata=$metadata\n";
- $metadata="";
- }
-
- if( $input =~ /^\[(korn-(\d+)-\d+)\]$/ )
- {
- $group = $1;
- }
- else
- {
- $group = "";
- }
- $auth="";
- $tls="";
- }
-
- if( $input =~ /^auth\=(.*)/ )
- {
- $metadata=$tls ? "auth=$1,tls=$tls" : "auth=$1";
- $auth=$1;
- print "# DELETE [$group]auth\n";
- }
- elsif( $input =~ /^tls\=(.*)/ )
- {
- $metadata=$auth ? "auth=$auth,tls=$1" : "tls=$1";
- $tls=$1;
- print "# DELETE [$tls]tls\n";
- }
-}