NAME

Video::Delay::Func - Video::Delay class for delays defined by math function.

SYNOPSIS

            

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

METHODS

new(%parameters)

            

              
              
Constructor
            
          

• func

  
              
  
                
                
  Math function in string with 't' time variable.
  Or callback with one input argument as time variable.
  Default value is reference to subroutine:
    sub {
      my $t = shift;
      return 1000 * sin($t);
    };
              
            

• incr

  
              
  
                
                
  Counter increment.
  Default value is 0.1.
              
            

delay()

            

              
              
Returns delay defined by function in miliseconds.
Time si affected by 'incr' increment parameter.
            
          

ERRORS

            

              
              
new():
        Parameter 'func' must be scalar or code.
        From Class::Utils::set_params():
                Unknown parameter '%s'.
delay():
        Error in function.
                Error, %s
            
          

EXAMPLE1

            

              
              
use strict;
use warnings;
use Video::Delay::Func;
# Object.
my $obj = Video::Delay::Func->new(
        'func' => sub {
                my $t = shift;
                return 1000 * sin($t);
        },
        'incr' => 0.1,
);
# Print delay.
print $obj->delay."\n";
print $obj->delay."\n";
print $obj->delay."\n";
# Output:
# 99.8334166468282
# 198.669330795061
# 295.52020666134
            
          

EXAMPLE2

            

              
              
use strict;
use warnings;
use Video::Delay::Func;
# Object.
my $obj = Video::Delay::Func->new(
        'func' => '1000 * sin(t)',
        'incr' => 0.1,
);
# Print delay.
print $obj->delay."\n";
print $obj->delay."\n";
print $obj->delay."\n";
# Output:
# 99.8334166468282
# 198.669330795061
# 295.52020666134
            
          

DEPENDENCIES

Class::Utils, English, Error::Pure.

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