in reply to file permission

Have you looked at File Test Operators? Or regular stat instead of File::Stat?

In Section Seekers of Perl Wisdom