RE: Object/size listing on IFS

I got a nice listing of the IFS from this command.  Now comes the secondary
question - since I'm not a programmer (I understand the logic, just not the
language), what's an easy way to get out the data I need?  Basically:

If char 1 of line x = '/' then give me that line and the next line and put
it in another file.  Continue processing until end of file.  

Pardon the retardation in regard to programming!  =)

jch

-----Original Message-----
From: Buck Calabro [mailto:Buck.Calabro@commsoft.net]
Sent: Tuesday, May 08, 2001 8:26 AM
To: MIDRANGE-L@midrange.com
Subject: RE: Object/size listing on IFS


Justin wrote:
>What's the best way to get a size listing on 
>folders and objects in the IFS?

I don't know about "the best," since I haven't any metrics to judge against,
but you can 
STRQSH CMD('ls -alR > /home/justin/dir.txt') 

and then process that file.  It looks something like this:
total: 1.456 megabytes                                                    
drwxrwxrwx  11 BUCK      0                135168 May  8 09:05 .           
drwxrwxrwx  3 QSYS      0                126976 Mar  8  2000 ..           
-rwxrwxrwx  1 BUCK      0                     0 May  8 08:06 819.txt      
-rwxrwxrwx  1 CALA7127  0                 32768 Oct 14  1999 AACAIC02.BKI 
drwxrwxrwx  2 CALA7127  0                 53248 Apr  3 11:36 CWT5ESS      
drwxrwxrwx  2 CALA7127  0                 81920 Mar 29 17:21 Databases    
-rwx------  1 BUCK      0                  5746 Feb 26 17:12 octtrc        
-rwxrwxrwx  1 BUCK      0                    14 Apr  3  2000 ums.secret    
                                                                           
./CWT5ESS:                                                                 
total: 208 kilobytes                                                        
drwxrwxrwx  2 CALA7127  0                 53248 Apr  3 11:36 .              
drwxrwxrwx  11 BUCK      0                135168 May  8 09:05 ..            
-rwxrwxrwx  1 CALA7127  0                  3062 Apr  3 10:39 UDSFILE03.dat  
-rwxrwxrwx  1 CALA7127  0                  3062 Apr  3 10:42 UDSFILE03a.dat 
-rwxrwxrwx  1 CALA7127  0                   255 Apr  3 10:42 pmasterx.dat   
                                                                            
./Databases:                                                                
total: 3.564 megabytes                                                      
drwxrwxrwx  2 CALA7127  0                 81920 Mar 29 17:21 .              
...

Buck Calabro
Commsoft; Albany, NY
"Nothing is so firmly believed as
 that which we least know" -- Michel Montaigne
Visit the Midrange archives at http://www.midrange.com


+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator:
david@midrange.com
+---
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---