Select Code to Download

($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,
         $atime,$mtime,$ctime,$blksize,$blocks)
...

$mode = $mode & 07777;
print "mode=".$mode."\n";

$ ls -l /etc/passwd
-rw-r--r--. 1 root root 1289 Jul 22 16:27 /etc/passwd
$ ./perms-module.pl /etc/passwd 644 root root
mode=420