Win32 package

use Win32;
$\ = "\n";
$OSVersion = Win32::GetOSVersion();
$NextAvailDrive = Win32::GetNextAvailDrive();
print "OS version shows in numeric :: ". "$OSVersion";
print "Next available drive is :: $NextAvailDrive";
print Win32::LoginName();
#print Win32::MsgBox("Hello",3);
print Win32::GetFullPathName("noname.pl");