Today as I'm working through a large file system utility application I'm writing, I was a bit surprised to find no work (seemingly) done on selinux within perl.

The singular task that I would like to accomplish is to read selinux context from files (ls -Z output). I could wrap ls to obtain this, however really, I would prefer a more graceful solution.

So I'm wondering if anyone has done anything in the past that they might be able to share?