Why not adopt me?
This distribution is up for adoption!
If you're interested then please contact the PAUSE module admins via
email.
NAME
Color::Swatch::ASE::Writer - Low level ASE ( Adobe Swatch Exchange ) file Writer.
VERSION
version 0.001003
SYNOPSIS
use Color::Swatch::ASE::Writer;
my $structure = {
blocks => [
{ type => 'group_start', label => 'My Colour Swatch' },
{ type => 'color', model => 'RGB ', values => [ 0.1 , 0.5, 0.9 ]},
{ type => 'color', model => 'RGB ', values => [ 0.9 , 0.5, 0.1 ]},
{ type => 'group_end' },
]
};
Color::Swatch::ASE::Writer->write_file(q[./myfile.ase], $structure );
This at present is very low-level simple structure encoding, and is probably not useful to most people.
Its based on the reverse-engineered specification of Adobe™'s "Swatch Exchange" format, which can be found documented many places:
METHODS
write_string
my $string = Color::Swatch::ASE::Writer->write_string($structure);
write_filehandle
Color::Swatch::ASE::Writer->write_filehandle($fh, $structure);
write_file
Color::Swatch::ASE::Writer->write_file(q[path/to/file.ase], $structure);
AUTHOR
Kent Fredric <kentnl@cpan.org>
COPYRIGHT AND LICENSE
This software is copyright (c) 2017 by Kent Fredric <kentfredric@gmail.com>.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.