NAME Device::Video::PWC SYNOPSIS use Device::Video::PWC; my $cam = Device::Video::PWC->new( '/dev/video0' ); $cam->set_pan ( 3000 ); $cam->set_tilt( -1000 ); $cam->set_framerate( 15 ); $cam->set electronic sharpness( 35000 ); $cam->dump_current_settings; $cam->restore_factory_settings; DESCRIPTION This module is an adaptation of source code of "setpwm" program. With this tool, you can only set settings specific to the Philips WebCams. SUBROUTINES/METHODS new( '/path/to/video/device' ) Constructor. The parameter is a path to video devices. Default value is set to "/dev/video0". set_device( '/path/to/video/device' ) This method allows to change used device. dump_current_settings() Dump current settings. set_framerate( $framerate ) Set framerate. Parameter $framerate has to be in a range 0 - 63. set_dimensions_and_framerate( $width, $height, $framerate) Set dimensions and framerate. All parameters must be set. Framerate has to be in a range 0 - 63. flash_settings() Store settings in nonvolatile RAM. restore_settings() Restore settings from nonvolatile RAM. restore_factory_settins() Restore factory settings. set_compression_preference( $val ) Set compression preference. Value has to be in a range 0 - 3. set_automatic_gain_control( $val ) Set automatic gain control. Value has to be in a range 0 - 65535. set_shutter_speed( $val ) Set shutter speed. Value has to be in a range 1 - 65535. set_automatic_white_balance_mode( $val ) Set automatic white balance mode. Value has to be one of "auto/manual/indoor/outdoor/fl" . red_balance( $val ) Set red balance (only if white balance mode is set to "manual"). Value has to be in a range 0 - 65535. blue_balance( $val ) Set blue balance (only if white balance mode is set to "manual"). Value has to be in a range 0 - 65535. set_automatic_white_balance_speed( $val ) Set speed of automatic white balance. Value has to be in a range 1 - 65535. set_automatic_white_balance_delay( $val ) Set delay for automatic white balance. Value has to be in a range 1 - 65535. set_led_on_time( $val ) Set led on time in ms. Value has to be in a range 0 - 25500. set_led_off_time( $val ) Set led off-time. set_electronic_sharpness( $val ) Set electronic sharpness. Value has t obe in a range 0 - 65535. set_backlight_compensation( $val ) Set backlight compensation. Possible values are 0 (for off) and 1 (for on). set_antiflicker_mode( $val ) Set antiflicker mode. Possible values are 0 (for off) and 1 (for on). set_noise_reduction($val) Set noise reduction mode. Possible values are from 0 (none) to 3 (high). reset_pan() Reset pan. reset_tilt() Reset tilt. query_pan_tilt_status() Query pan/tilt status. set_pan( $val ) Set pan position. set_tilt Set tilt position. DEPENDENCIES None. INCOMPATIBILITIES None known. BUGS AND LIMITATIONS None. I hope. THANKS Thanks to Folkert van Heusden , who is an author of original source code for "setpwc". AUTHOR Strzelecki Lukasz LICENCE AND COPYRIGHT This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See http://www.perl.com/perl/misc/Artistic.html