Help for this page
Select Code to Download
Select
or
download this
my $mode = (stat($file))[2];
Select
or
download this
use File::stat; my $mode = stat($file)->mode;