#!/usr/bin/perl

require '/usr/lib/perl/5.8.4/sys/ioctl.ph'; # replace with whatever is the full path