Select Code to Download

{
use Fcntl; sysopen my $f, "/dev/hdc", O_RDONLY|O_NONBLOCK or die "open
+ $?";
ioctl $f, 0x5309, 0 or die "ioctl $!";
}