s_isreg

True if a stat-mode value names a regular file.

Synopsis

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.