Lines Matching refs:perms
2826 my($perms,%user,%group);
2836 if (-f _) { $perms = '-'; }
2837 elsif (-d _) { $perms = 'd'; }
2838 elsif (-c _) { $perms = 'c'; $sizemm = &sizemm; }
2839 elsif (-b _) { $perms = 'b'; $sizemm = &sizemm; }
2840 elsif (-p _) { $perms = 'p'; }
2841 elsif (-S _) { $perms = 's'; }
2842 else { $perms = 'l'; $pname .= ' -> ' . readlink($_); }
2855 $perms .= $tmp;
2873 $perms,