Quiq::TimeLapse::Sequence - Bildsequenz
Quiq::Hash
# Klasse laden use %CLASS; # Instantiiere Sequence-Objekt $tsq = Quiq::TimeLapse::Sequence->new(\@images); # Exportiere Bilddateien in Verzeichnis $tsq->export($dir);
$tsq = $class->new(\@images);
Array von Bilddatei-Objekten
Referenz auf das Bildsequenz-Objekt
Instantiiere Bildsequenz-Objekt aus den Bilddateien \@images und liefere eine Referenz auf dieses Objekt zurück.
$n = $tsq->count;
Integer >= 0
Liefere die Anzahl der in der Sequenz enthaltenen Bilddateien.
$duration = $tsq->duration($framerate);
String
Berechne die Dauer der Bildsequenz, wenn sie mit Framerate $framerate gerendert wird, und liefere das Ergebnis als Zeitdauer in dem Format HhMmS.XXXs (drei Nachkommastellen).
HhMmS.XXXs
$tsq->export($destDir);
Pfad des Zielverzeichnisses.
nichts
Exportiere die Bildsequenz nach Verzeichnis $destDir. Existiert $destDir nicht, wird es erzeugt. Existiert das Verzeichnis, wird die Bildsequenz angehängt.
$tsq->morph($n,$destDir);
Anzahl der Zwischenbilder.
Exportiere die Bildsequenz nach Verzeichnis $destDir mit jeweils $n gemorphten Zwischenbildern. Existiert $destDir nicht, wird es erzeugt. Existiert das Verzeichnis, wird die Bildsequenz angehängt.
$tsq->generate($file,@opt);
Die zu erzeugende Video-Datei, z.B. '2018-07-28-anreise.mp4'.
Zeige Änderungen, führe sie aber nicht aus.
Dauer der am Ende des Clip hinzugefügten "Ende-Frames" in Sekunden. Ist der Wert negativ, wird der Clip auf diese Dauer verlängert (ist der Clip länger, wird der Default genommen). Die End-Frames verlängern den Clip bis zur vollen Sekunde plus $sec-1 Sekunden. D.h. der Wert 1 füllt bis zur nächsten vollen Sekunde auf. Bei 0 werden keine End-Frames hinzugefügt (was nicht ratsam ist, da ffmpeg dann am Clip-Ende seltsame Ergebnisse produziert).
Anzahl Bilder pro Sekunde.
Satz an vorgewählten Optionen, für Encoding-Zeit vs. Kompressionsrate. Schnellstes Encoding: 'ultrafast', beste Kompression: 'veryslow'. Siehe Quiq::FFmpeg, imagesToVideo().
Geometrie des erzeugten Videos.
Video-Bitrate in kbit/s.
Framerate des Video.
Erzeuge aus der Bildsequenz das Video $file.
@images|$imageA = $tsq->images;
Liste Bilddatei-Objekte. Im Skalarkontext eine Referenz auf die Liste.
Liefere die Liste der Bilddatei-Objekte der Sequenz.
$sha1 = $tsq->sha1(@keyVal);
SHA1 Digest
Berechne den SHA1 Hash-Wert für die Sequenz und liefere diesen zurück. Der Hash-Wert wird gebildet über allen Bilddateien, derem Pfad, deren Größe und Änderungszeitpunkt.
Anhand des SHA1 Hash-Werts läßt sich prüfen, ob eine Änderung an der Bildsequenz stattgefunden hat und eine teure Operation wie das (erneute) Rendern eines Video notwendig ist.
$tsq = $tsq->pick($n);
Bildsquenz-Objekt (für Chaining)
Reduziere die Folge der Bilddatei-Objekte auf jedes n-te Element, d.h. entferne alle anderen
$tsq = $tsq->reverse;
Kehre die Folge der Bilddatei-Objekte um, so dass das erste Bild zum letzten wird, das zweite zum vorletzten usw.
1.138
Frank Seitz, http://fseitz.de/
Copyright (C) 2019 Frank Seitz
This code is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
To install Quiq, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Quiq
CPAN shell
perl -MCPAN -e shell install Quiq
For more information on module installation, please visit the detailed CPAN module installation guide.