Xu Xiaodong avatar Xu Xiaodong committed 6b78d4c

add mt.sh

Comments (0)

Files changed (2)

 # author:    Xu Xiaodong <xxdlhy@gmail.com>
 # license:   GPL
 # created:   2011 May 27
-# modified:  2011 May 27
+# modified:  2011 Aug 12
 #
 
 use strict;
 use warnings;
 
-use File::Copy qw(cp);
 use File::Find;
 use Tie::File;
 
-my $addr = shift;
-my $dir  = shift;
-
-mkdir "$ENV{HOME}/work/modup/$addr" unless -d $addr;
+my $dir = shift;
 
 find(
   sub {
 
       close $in_fh;
 
-      my $file = "$ENV{HOME}/work/modup/$addr/tomcat-users_${user}.xml";
+      my $line
+        = qq{  <user username="EV7632LCD$user" password="$pass" roles="digestdemo,rolevmt"/>\n};
 
-      cp( "$ENV{HOME}/work/modup/tomcat-users.xml", $file );
-
-      tie my @lines, 'Tie::File', $file
-        or die "Can't read $file: $!\n";
-
-      for (@lines) {
-        s/(.*username="EV7632LCD)(.*)("\spassword=")(.*)("\sroles.*)/$1$user$3$pass$5/;
-      }
-
-      untie @lines;
+      print $line;
     }
   },
   $dir
+#!/bin/sh
+#
+# author:    Xu Xiaodong <xxdlhy@gmail.com>
+# modified:  2011 Aug 12
+#
+
+SRC=$1
+OUT=$2
+
+./modup "$SRC" | sort > "$OUT"
+
+# vim: ai:et:ts=2:sw=2:sts=2:tw=78:ft=sh
Tip: Filter by directory path e.g. /media app.js to search for public/media/app.js.
Tip: Use camelCasing e.g. ProjME to search for ProjectModifiedEvent.java.
Tip: Filter by extension type e.g. /repo .js to search for all .js files in the /repo directory.
Tip: Separate your search with spaces e.g. /ssh pom.xml to search for src/ssh/pom.xml.
Tip: Use ↑ and ↓ arrow keys to navigate and return to view the file.
Tip: You can also navigate files with Ctrl+j (next) and Ctrl+k (previous) and view the file with Ctrl+o.
Tip: You can also navigate files with Alt+j (next) and Alt+k (previous) and view the file with Alt+o.