#!/usr/bin/perl

use strict;
use warnings;
use v5.10;
use Yars::Command::yars_disk_scan;

Yars::Command::yars_disk_scan->main(@ARGV);

__END__

=pod

=head1 NAME

yars_disk_scan - scan a disk for corruption and report corrupt files to stdout

=head1 VERSION

version 1.00

=head1 SYNOPSIS

 yars_disk_scan -a
 yars_disk_scan /disk/one /disk/two

=head1 DESCRIPTION

Add a cron entry which does a yars_disk_scan periodically
in order to check the md5s of all the files on disk.

=head1 AUTHOR

original author: Marty Brandon

current maintainer: Graham Ollis <plicease@cpan.org>

contributors:

Brian Duggan

=head1 COPYRIGHT AND LICENSE

This software is copyright (c) 2013 by NASA GSFC.

This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.

=cut