```{index} single: s_issock; Fcntl function ``` ```{index} single: Fcntl::s_issock; Perl function ``` # s_issock True if a stat-mode value names a socket. ## Synopsis ```perl my $mode = (stat $path)[2]; print "socket\n" if S_ISSOCK($mode); ``` Returns `1` when `$mode & S_IFMT == S_IFSOCK`, `0` otherwise. With no argument, returns `0`.