mode.pl was done as part of the examination in a Perl course I attended at school.
Basically it's a script for setting permissions on files and directories recursively.
Usage: mode.pl [options] [files]
-h display this text.
-R set modes recursively.
-d NN directory mode.
-f NN file mode.