Select Code to Download

    my $pixel_format = 'rgb24';
    my $file = 0; # device number 0, or .avi file, for reproducible te
+sting
    my ($pid,$stream) = $self->spawn(sprintf qq{%s -f vfwcap -r 30 -i 
+%s -f rawvideo -pix_fmt %s - |},
        $self->ffmpeg, $file, $pixel_format
    );