perl module skeleton

diff --git a/Makefile.PL b/Makefile.PL
new file mode 100644 (file)
index 0000000..233c603
--- /dev/null
+++ b/Makefile.PL
@@ -0,0 +1,21 @@
+use inc::Module::Install;
+
+name     'Printer-EVOLIS';
+all_from 'lib/Printer/EVOLIS.pm';
+author   q{Dobrica Pavlinusic <dpavlin@rot13.org>};
+license  'perl';
+
+requires 'Data::Dump';
+requires 'Device::ParallelPort';
+
+build_requires 'Test::More';
+
+build_requires 'Module::Install::Repository';
+auto_set_repository;
+
+test_requires 'Pod::Readme';
+
+auto_install;
+
+WriteAll;
+

diff --git a/lib/Printer/EVOLIS.pm b/lib/Printer/EVOLIS.pm
new file mode 100644 (file)
index 0000000..9de7128
--- /dev/null
+++ b/lib/Printer/EVOLIS.pm
@@ -0,0 +1,34 @@
+package Printer::EVOLIS;
+
+use warnings;
+use strict;
+
+=head1 NAME
+
+Printer::EVOLIS - pixel-exact driver for EVOLIS Dualys two-side card printer in perl
+
+=cut
+
+our $VERSION = '0.01';
+
+=head1 DESCRIPTION
+
+This is experimental support for EVOLIS Dualys 3 printer with black ribbon (K) to provide
+pixel-exact driver with support for two-side printing.
+
+Existing cups driver available at
+
+L<http://www.evolis.com/eng/Drivers-Support/Product-support/Dualys-3>
+
+does work, but I haven't been able to make it print duplex on cards, especially when generating
+front and back pages separatly.
+
+=head2 Printer simulator
+
+C<evolis-printer.pl> provides simulator for EVOLIS printer which is useful for development
+
+=head2 Printer driver
+
+C<evolis-driver.pl> provides driver which generates printer commands
+
+=cut

diff --git a/t/00-load.t b/t/00-load.t
new file mode 100755 (executable)
index 0000000..f8ff7e9
--- /dev/null
+++ b/t/00-load.t
@@ -0,0 +1,10 @@
+#!/usr/bin/perl -T
+
+use Test::More tests => 7;
+
+BEGIN {
+       use lib 'lib';
+       use_ok( 'Printer::EVOLIS' );
+}
+
+diag( "Testing Printer::EVOLIS $Printer::EVOLIS::VERSION, Perl $], $^X" );