The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.
 / 
Compare-Directory-0.01
River stage zero No dependents
/ Compare::Directory

NAME

Compare::Directory - A very simple utility to compare directory.

VERSION

Version 0.01

SYNOPSIS

The one and only objective of this module is compare two directory contents. Currently it can only compare the following file types:

.txt: Text File
.csv: Comma Seperated File
.pdf: PDF File
.xml: XML File
.xls: Excel File

CONSTRUCTOR

The constructor expects the two directories name with complete path.

   use strict; use warnings;
   use Compare::Directory;
   
   my $directory = Compare::Directory("./got-1", "./exp-1");

METHODS

cmp()

This is the public that initiates the actual directory comparison. You simply call this method against the object. Returns 1 if directory comparison succeed otherwise returns 0.

   use strict; use warnings;
   use Compare::Directory;
   
   my $directory = Compare::Directory("./got-1", "./exp-1");
   $directory->cmp();

_cmp($$)

This is an internal method where the actual comparison happens. This gets called by the method cmp().

_cmp_pdf()

This is an internal method for PDF comparison. Code borrowed from Test::PDF. [http://search.cpan.org/~stevan/Test-PDF-0.01/lib/Test/PDF.pm]

AUTHOR

Mohammad S Anwar, <mohammad.anwar@yahoo.com>

BUGS

Please report any bugs or feature requests to bug-compare-directory at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Compare-Directory. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.

SUPPORT

You can find documentation for this module with the perldoc command.

    perldoc Compare::Directory

You can also look for information at:

ACKNOWLEDGEMENTS

LICENSE AND COPYRIGHT

Copyright 2010 Mohammad S Anwar.

This program is free software; you can redistribute it and/or modify it under the terms of either: the GNU General Public License as published by the Free Software Foundation; or the Artistic License.

See http://dev.perl.org/licenses/ for more information.