Help for this page

Select Code to Download


  1. or download this
    eval { require 'sys/ioctl.ph' };
# skip if $@ contains
# "Can't locate 'sys/ioctl.ph' in @INC (did you run h2ph?)"
  2. or download this
    package funnybusiness;
use warnings;
...
}

1;
  3. or download this
    use warnings;
use strict;

...
#require 'sys/ioctl.ph';

funnybusiness::s1;