Help for this page

Select Code to Download


  1. or download this
    use Win32API::File qw (:Func );

...
print "VolName:\t$osVolName\n";
print "SerialNumber:\t$ouSerialNum\n";
printf "Hex SerialNumber:\t%x\n", $ouSerialNum;
  2. or download this
    Root:   C:/
VolName:        mecano
SerialNumber:   2226596281
Hex SerialNumber:       84b729b9
  3. or download this
     >vol c:
 Volume in drive C is mecano
 Volume Serial Number is 84B7-29B9