Anki-Import

 view release on metacpan or  search on metacpan

META.json  view on Meta::CPAN

            "Cwd" : "0",
            "Exporter" : "0",
            "Getopt::Args" : "0",
            "Log::Log4perl::Shortcuts" : "0.021",
            "strict" : "0",
            "warnings" : "0"
         }
      },
      "test" : {
         "requires" : {
            "Data::Dumper" : "0",
            "File::Path" : "0",
            "File::Spec" : "0",
            "Getopt::Args" : "0",
            "Test::Exception" : "0",
            "Test::More" : "0",
            "Test::Output" : "0",
            "Test::Warnings" : "0"
         }
      }
   },

META.yml  view on Meta::CPAN

---
abstract: 'Anki note generation made easy.'
author:
  - 'Steve Dondley <s@dondley.com>'
build_requires:
  Data::Dumper: '0'
  File::Path: '0'
  File::Spec: '0'
  Getopt::Args: '0'
  Test::Exception: '0'
  Test::More: '0'
  Test::Output: '0'
  Test::Warnings: '0'
configure_requires:
  ExtUtils::MakeMaker: '0'
  File::ShareDir::Install: '0.06'

Makefile.PL  view on Meta::CPAN

  "NAME" => "Anki::Import",
  "PREREQ_PM" => {
    "Cwd" => 0,
    "Exporter" => 0,
    "Getopt::Args" => 0,
    "Log::Log4perl::Shortcuts" => "0.021",
    "strict" => 0,
    "warnings" => 0
  },
  "TEST_REQUIRES" => {
    "Data::Dumper" => 0,
    "File::Path" => 0,
    "File::Spec" => 0,
    "Getopt::Args" => 0,
    "Test::Exception" => 0,
    "Test::More" => 0,
    "Test::Output" => 0,
    "Test::Warnings" => 0
  },
  "VERSION" => "0.030",
  "test" => {
    "TESTS" => "t/*.t"
  }
);


my %FallbackPrereqs = (
  "Cwd" => 0,
  "Data::Dumper" => 0,
  "Exporter" => 0,
  "File::Path" => 0,
  "File::Spec" => 0,
  "Getopt::Args" => 0,
  "Log::Log4perl::Shortcuts" => "0.021",
  "Test::Exception" => 0,
  "Test::More" => 0,
  "Test::Output" => 0,
  "Test::Warnings" => 0,
  "strict" => 0,

share/log_config/anki-import.cfg  view on Meta::CPAN

log4perl.appender.trace.layout=PatternLayout
log4perl.appender.debug.layout=PatternLayout
log4perl.appender.info.layout=PatternLayout
log4perl.appender.warn.layout=PatternLayout
log4perl.appender.error.layout=PatternLayout
log4perl.appender.fatal.layout=PatternLayout

log4j.PatternLayout.cspec.E = sub { return [caller(5)]->[1]; };
log4j.PatternLayout.cspec.e = sub { return [caller(5)]->[2]; };
#log4j.PatternLayout.cspec.D = sub { use Data::Dumper qw(Dumper); return Dumper($_[1]); };
log4j.PatternLayout.cspec.s = sub { return [caller(6)]->[1] . ': ' . [caller(6)]->[2]; };

log4perl.appender.trace.layout.ConversionPattern=[%-5p] %-80m %c: %e%n
log4perl.appender.debug.layout.ConversionPattern=[%-5p] %c: %e%n        %8m%n
log4perl.appender.info.layout.ConversionPattern= [%-5p] %-80m %c: %e%n
#log4perl.appender.info.layout.ConversionPattern= [%-5p] %-80m %n
log4perl.appender.warn.layout.ConversionPattern= [%-5p] %-80m
log4perl.appender.error.layout.ConversionPattern=[%-5p] %m%n
log4perl.appender.fatal.layout.ConversionPattern=[%-5p] %-80m

share/log_config/test.cfg  view on Meta::CPAN

log4perl.appender.trace.layout=PatternLayout
log4perl.appender.debug.layout=PatternLayout
log4perl.appender.info.layout=PatternLayout
log4perl.appender.warn.layout=PatternLayout
log4perl.appender.error.layout=PatternLayout
log4perl.appender.fatal.layout=PatternLayout

log4j.PatternLayout.cspec.E = sub { return [caller(5)]->[1]; };
log4j.PatternLayout.cspec.e = sub { return [caller(5)]->[2]; };
#log4j.PatternLayout.cspec.D = sub { use Data::Dumper qw(Dumper); return Dumper($_[1]); };
log4j.PatternLayout.cspec.s = sub { return [caller(6)]->[1] . ': ' . [caller(6)]->[2]; };

log4perl.appender.trace.layout.ConversionPattern=[%-5p] %-80m %c: %e%n
log4perl.appender.debug.layout.ConversionPattern=[%-5p] %c: %e%n        %8m%n
log4perl.appender.info.layout.ConversionPattern= [%-5p] %-80m %c: %e%n
log4perl.appender.warn.layout.ConversionPattern= [%-5p] %-80m %c: %e%n
log4perl.appender.error.layout.ConversionPattern=[%-5p] %m%n
log4perl.appender.fatal.layout.ConversionPattern=[%-5p] %-80m %c: %e%n

t/03-format_tests.t  view on Meta::CPAN

is (mcount(">Line 3</div>"), 1, 'line 3 does not end in <br>');

$data = get_data('escape_angle_brackets', 'basic');

is (mcount("&lt;"), 4, 'got expected number of html entities');
is ($data =~ /with &lt;angle/, 1, 'first angle bracket replaced');
is ($data =~ /one &lt;angle/, 1, 'second angle bracket replaced');
is ($data =~ /more &lt;of/, 1, 'third angle bracket replaced');
is ($data =~ /of &lt;them/, 1, 'last angle bracket replaced');

use Data::Dumper qw(Dumper);

print Dumper $data;



my $path = File::Spec->catfile('t', 'data', 'anki_import_files');
rmtree $path;

sub get_data {
  my $file = shift;