Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl

...

        ioctl(fd, KDSETLED, orig);
}
  2. or download this
    #!/usr/bin/perl

...
sleep( 2 );

ioctl(FH, $KDSETLED, $orig);
  3. or download this
    #!/usr/bin/perl

...
        ioctl(FH, $KDSETLED, $i);
        sleep( 2 );
}