What's with splitting, joining, splitting? why not just:

Code:

$ini='d:\printer.ini'
$printers=split(readprofilestring($ini,'Printers',''),chr(10))
for each $printer in $printers
   $users=split(readprofilestring($ini,'Printers',$printer), ',')
   if ascan($users,@USERID)+1
      ? @USERID+' gets printer '+$printer
   endif
next
_________________________
Eric