The Tor Browser / file revision

 #!/bin/perl

 # 

 # This Source Code Form is subject to the terms of the Mozilla Public

 # License, v. 2.0. If a copy of the MPL was not distributed with this

 # file, You can obtain one at http://mozilla.org/MPL/2.0/.

 # -----------------------------------------------------------------

 #

 # explode.pl -- Unpack .jar files into bin, lib, include directories

 #

 # syntax: perl explode.pl

 #

 # Description:

 # explode.pl unpacks the .jar files created by the NSPR build   

 # procedure. 

 #

 # Suggested use: After copying the platform directories to

 # /s/b/c/nspr20/<release>. CD to /s/b/c/nspr20/<release> and

 # run explode.pl. This will unpack the jar files into bin, lib,

 # include directories.

 #

 # -----------------------------------------------------------------

 @dirs = `ls -d *.OBJ*`;

 foreach $dir (@dirs) {

     chop($dir);

     if (-l $dir) {

         print "Skipping symbolic link $dir\n";

         next;

     }

     print "Unzipping $dir/mdbinary.jar\n";

     system ("unzip", "-o", "$dir/mdbinary.jar",

             "-d", "$dir");

     system ("rm", "-rf", "$dir/META-INF");

     mkdir "$dir/include", 0755;

     print "Unzipping $dir/mdheader.jar\n";

     system ("unzip", "-o", "-aa",

             "$dir/mdheader.jar",

             "-d", "$dir/include");

     system ("rm", "-rf", "$dir/include/META-INF");

 }

 # --- end explode.pl ----------------------------------------------