Data-Edit-Xml-Xref

 view release on metacpan or  search on metacpan

Build.PL  view on Meta::CPAN

  dist_abstract         => 'Cross reference Dita XML, match topics and ameliorate missing references.',
  dist_author           => 'philiprbrenan@gmail.com',
  license               => 'perl',
  module_name           => 'Data::Edit::Xml::Xref',
  requires              => {
     perl               => '5.26.1',
     Carp               => 0,
    'Data::Dump'        => 0,
    'Data::Edit::Xml'                => 20200218,
    'Data::Table::Text'              => 20200418,
    'Dita::GB::Standard'             => 20190911,
    'Test::More'        => 0,
    'Test2::API'        => 0,
     utf8               => 0,
   },
 );

$b->create_build_script();

META.json  view on Meta::CPAN

         "requires" : {
            "Module::Build" : "0.4224"
         }
      },
      "runtime" : {
         "requires" : {
            "Carp" : "0",
            "Data::Dump" : "0",
            "Data::Edit::Xml" : "20200218",
            "Data::Table::Text" : "20200418",
            "Dita::GB::Standard" : "20190911",
            "Test2::API" : "0",
            "Test::More" : "0",
            "perl" : "v5.26.1",
            "utf8" : "0"
         }
      }
   },
   "provides" : {
      "Data::Edit::Xml::Xref" : {
         "file" : "lib/Data/Edit/Xml/Xref.pm",

META.yml  view on Meta::CPAN

name: Data-Edit-Xml-Xref
provides:
  Data::Edit::Xml::Xref:
    file: lib/Data/Edit/Xml/Xref.pm
    version: '20200424'
requires:
  Carp: '0'
  Data::Dump: '0'
  Data::Edit::Xml: '20200218'
  Data::Table::Text: '20200418'
  Dita::GB::Standard: '20190911'
  Test2::API: '0'
  Test::More: '0'
  perl: v5.26.1
  utf8: '0'
resources:
  license: http://dev.perl.org/licenses/
version: '20200424'
x_serialization_backend: 'CPAN::Meta::YAML version 0.018'

lib/Data/Edit/Xml/Xref.pm  view on Meta::CPAN

package Data::Edit::Xml::Xref;
our $VERSION = 20200424;
use v5.26;
use warnings FATAL => qw(all);
use strict;
use Carp qw(confess cluck);
use Data::Dump qw(dump);
use Data::Edit::Xml;
use Data::Table::Text qw(:all);
use Dita::GB::Standard;
use Storable qw(store retrieve);
use Time::HiRes qw(time);
use utf8;

#sub improvementLength      {80}                                                 #P Maximum length of the test of an improvement suggestion
sub classificationMapSuffix{q(_classification.ditamap)}                         #P Suffix to add to map files to create corresponding classification map file

#D1 Cross reference                                                             # Check the cross references in a set of Dita files and report the results.

sub newXref(%)                                                                  #P Create a new cross referencer

 view all matches for this distribution
 view release on metacpan -  search on metacpan