ftpd::Session method file format list (protected)
<instance of ftpd::Session> file format list file
Defined in
- Parameters:
- file (required)
- Testcases:
-
No testcase defined.
Source code:
file stat $file stat
if {$::tcl_platform(platform) eq "unix"} {
set user [file attributes $file -owner]
set group [file attributes $file -group]
} else {
set user owner
set group
}
return [format "%s %3d %8s %8s %11s %s %s" [:file format permissions [file type $file] $stat(mode)] $stat(nlink) $user $group $stat(size) [:file format date $stat(mtime)] [file tail $file]]
XQL Not present:Generic, PostgreSQL, Oracle
[
hide source ]
| [
make this the default ]