The Perl Quota module provides access to filesystem quotas.

WWW: http://search.cpan.org/dist/Quota/