You may be interested to have a look at the Filesys::Df module and the discussions that followed on this module and comparative merits of using it over parsing df output here and here.