my %permname = qw(1 Read g Read 35 Write);
  $access = $permname{  $${_}{permissions}  } || "unknown" ;