/***************************************************************/
/* WHO EXEC - Produce a formatted listing of the connected and */
/* disconnected users. */
/***************************************************************/
'pipe (name who endchar ?)',
' cp q n',
'| split /,/',
'| strip ',
'| nlocate x4A',
'|nloc: nlocate /DSC/',
'| nlocate /VSM/',
'| spec w1',
'| sort 1-8 a',
'| pad 12',
'| join 5',
'| preface literal Connected Users:',
'| console',
'?',
'nloc: ',
'| spec w1',
'| sort 1-8 a',
'| pad 12',
'| join 5',
'| preface literal Disconnected Users:',
'| preface literal " "',
'| console'
               (
geocities.com/vmvse)