␉␉$disk = $1;␊ |
␉␉$partition = $2;␊ |
␉␉$volume =~ s/ /\\ /g;␊ |
␉␉system ($destino."/i386/fdisk -f ".$destino."/i386/boot0 -u -y /dev/r".$disk);␊ |
␉␉system ("dd if=".$destino."/i386/boot1h of=/dev/r".$disk."s".$partition);␊ |
␉␉system ("cp ".$destino."/i386/boot ".$volume);␊ |
␉␉system ($destino."/fdisk -f ".$destino."/boot0 -u -y /dev/r".$disk);␊ |
␉␉system ("dd if=".$destino."/boot1h of=/dev/r".$disk."s".$partition);␊ |
␉␉system ("cp ".$destino."/boot ".$volume);␊ |
␉␉open (PIPE, "|fdisk -e /dev/".$disk."|");␊ |
␉␉print PIPE "f ".$partition."\n";␊ |
␉␉print PIPE "write\n";␊ |