Select Code to Download

  use Win32::API;
  $function = new Win32::API($library, 
...
                             \@argumenttypes, 
                             $returntype);
  $return = $function->Call(@arguments);

BOOL GetDiskFreeSpaceEx(
  LPCTSTR lpDirectoryName,  // pointer to the directory name
...
  PULARGE_INTEGER lpTotalNumberOfBytes,    // receives the number of b
+ytes on disk
  PULARGE_INTEGER lpTotalNumberOfFreeBytes // receives the free bytes 
+on disk
);