in reply to BootDisk
diotalevi is correct. Doing this with Perl is overkill. However, it is possible. I've never done it but it sure sounds like fun. If you still want to do it with Perl and Perl modules, then...
First, you will want to get familiar with Win32. You can and should use the GetOSName function to find out what version of Windows your program is running on. (demerphq pointed this out to me back in June of this year.) You can use the MsgBox function to create message boxes.
You can use Win32API::File to format your floppy disks. The DeviceIoControl function will allow you to format a drive. This makes it much easier than doing it with Win32::API or Inline::C.
You are probably going to want to use File::Copy to copy the files to the floppy disk. But since you will be using Win32API::File, you could use its CopyFile function if you wanted.
I wish you the best of luck if you decide to take this route.
Updated: fixed some wordos...
|
|---|