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