my( @userdirs ) = GetUserDirs();
ScanUserDirs( \@userdirs );