Here you can use the system calls that are available in Perl. Because Perl has the feature using system calls available in 'C' library as module to this one.

All this functionalities are already available as a module in perl.

So using these module you can directly access the Inode entry of the file system then you can get the relevant information.

If you write in those sort of program it will be faster and useful to all the applications you develop.