The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Video::Delay::Array - Video::Delay class for predefined list of delays.

SYNOPSIS

 use Video::Delay::Array;

 my $obj = Video::Delay::Array->new(%parameters);
 my $delay = $obj->delay;

METHODS

new(%parameters)
 Constructor
  • array

     Array of predefined delays in miliseconds.
     Default value is [1000, 2000, 3000].
  • loop

     Loop flag.
     Default value is 1.
delay()
 Returns delay from array defined by 'array' parameter in miliseconds.
 Affected by 'loop' parameter.

ERRORS

 new():
         From Class::Utils::set_params():
                 Unknown parameter '%s'.

EXAMPLE

 use strict;
 use warnings;

 use Video::Delay::Array;

 # Object.
 my $obj = Video::Delay::Array->new(
         'array' => [1000, 2000],
         'loop' => 1,
 );

 # Print delay.
 print $obj->delay."\n";
 print $obj->delay."\n";
 print $obj->delay."\n";

 # Output:
 # 1000
 # 2000
 # 1000

DEPENDENCIES

Class::Utils.

SEE ALSO

Video::Delay

Perl classes for delays between frames generation.

REPOSITORY

https://github.com/michal-josef-spacek/Video-Delay

AUTHOR

Michal Josef Špaček mailto:skim@cpan.org

http://skim.cz

LICENSE AND COPYRIGHT

 © 2012-2020 Michal Josef Špaček
 BSD 2-Clause License

VERSION

0.07