diff --git a/README.md b/README.md index c1e3e8d..d63e941 100644 --- a/README.md +++ b/README.md @@ -4,3 +4,13 @@ Various experiments to convert image files to avif ## Debian dependencies +- libmagickcore-6-headers: /usr/include/ImageMagick-6/magick/MagickCore.h + +## Running it + + ./image_magick/to_avif.pl images/me.png >> me.avif + +## TODOs + +- Debian build from CPAN fails, can't find MagickCore.h +- Install `libimage-magick-perl` for now diff --git a/image_magick/to_avif.pl b/image_magick/to_avif.pl old mode 100644 new mode 100755 index e69de29..725ea0e --- a/image_magick/to_avif.pl +++ b/image_magick/to_avif.pl @@ -0,0 +1,18 @@ +#!/usr/bin/env perl + +use v5.36; +use Image::Magick; + +unless ($ARGV[0]) { + say "give me image file, e.g.: $0 goatse.jpeg"; + exit 64; +} + +my $p = Image::Magick->new; +my $file = $ARGV[0]; + +$p->Read($file); + +# Write to STDOUT instead of file +binmode STDOUT; +$p->Write('avif:-'); diff --git a/images/me.png b/images/me.png new file mode 100644 index 0000000..fbfda63 Binary files /dev/null and b/images/me.png differ