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