use Win32::API; $function = new Win32::API($library, $functionname, \@argumenttypes, $returntype); $return = $function->Call(@arguments); #### BOOL GetDiskFreeSpaceEx( LPCTSTR lpDirectoryName, // pointer to the directory name PULARGE_INTEGER lpFreeBytesAvailableToCaller, // receives the number of bytes on // disk available to the caller PULARGE_INTEGER lpTotalNumberOfBytes, // receives the number of bytes on disk PULARGE_INTEGER lpTotalNumberOfFreeBytes // receives the free bytes on disk );