Использует формат %m для флага -printf.
$ find /etc/ -maxdepth 0 -printf "%m\n"
755
или
$ find /etc/ -prune -printf "%m\n"
755
$ python -c 'import os,sys;print(oct(os.stat(sys.argv[1]).st_mode))' /etc
040755
Или, если мы хотим получить только биты разрешения владельца-группы:
$ python -c 'import os,sys;print(oct(os.stat(sys.argv[1]).st_mode)[-3:])' /etc
755
Через File::stat, в значительной степени тот же как в документации:
$ perl -le 'use File::stat; $fs=stat($ARGV[0]);printf "%o\t%s\n",$fs->mode & 07777,$ARGV[0]' /etc
755 /etc