Select Code to Download

#!/usr/local/bin/perl 

...
  closedir(DIR);
  return @sub_dirs;
}

                                func_ss_dir1                          
+                                              func_ss_dir1
      sr2r           hr2r          si2r             sr2o           hi2
+r         hr2o           sr2r         hr2r          si2r             
+sr2o           hi2r         hr2o
  wns tns fep     wns tns fep   wns tns fep    wns tns fep  wns tns fe
+p  wns tns fep  wns tns fep   wns tns fep   wns tns fep    wns tns fe
+p  wns tns fep  wns tns fep
  -1   -2  2     -1   -2  2    -1   -2  2     -1   -2  2   -1   -2  2 
+  -1   -2  2   -1   -2  2    -1   -2  2    -1   -2  2     -1   -2  2 
+  -1   -2  2   -1   -2  2