@list=('aaa'..'aax');
print _sprintlist(\@list,"Members:",undef,10,undef,60,"* ");