
files = 'ls'( 'trip/*.rexx' )

do while files^=''
   parse var files file files
   say 
   say center(' 'file' ',72,'=')
   'rexx' file
   end
