#Format#umask(EXPR)#umask EXPR#umask$ perl -e 'printf("The umask is %o.\n", umask);'$ perl -e 'umask 027; printf("The new mask is %o.\n", umask);'