my @stat = stat $filename;
say $stat[5];