$ perl -e 'mkdir "foo", 0750; chmod 02750, "foo"'
$ ls -ld foo
drwxr-s--- 2 eliya eliya 4096 Apr 27 11:41 foo/