problems with Win32::API import

2005-06-17 Thread Sumitro Chowdhury
r )'); if($GetTempPathRetVal eq 0) { die "Can't import API GetTempPath : $^E\n"; } my $lpBuffer = '-'x80; my $returnval = GetTempPath(79,$lpBuffer); my $TempPath = substr($lpBuffer,0,$returnval); print "Temp path is : $TempPath !!\n";

Re: problems with Win32::API import

2005-06-20 Thread Sumitro Chowdhury
Thanks Lloyd. that was good info. I couldn't find related problem in the archives ... can you please send me the URL to the discussion you mentioned ? I hope to learn more from that thread. Thanks for your time, Sumitro Chowdhury From: Lloyd Sartor <[EMAIL PROTECTED]> T

Win32::API prototype 64bit Math for GetDiskFreeSpaceEx

2005-06-20 Thread Sumitro Chowdhury
$Lo /= (1024**3); $Hi *= 4; return $Lo+$Hi; } I get : Got back FreeBytesAvailable as 1843236864 Got back TotalNumberOfBytes as 1388666880 Got back TotalNumberOfFreeBytes as 1843236864 FreeBytesAvailable converts as 3772304584.80006 TotalNumberOfBytes converts as 3772307672.87843 TotalNu