# File lib/specinfra/command/solaris/v10/file.rb, line 4
    def check_has_mode(file, mode)
      regexp = "^#{mode}$"
      "perl -e 'printf \"%o\", (stat shift)[2]&07777' #{escape(file)}  | grep -- #{escape(regexp)}"
    end