view release on metacpan or  search on metacpan

script/corruptor  view on Meta::CPAN

#!perl

# Note: This script is a CLI for Riap function /App/corruptor/corruptor
# and generated automatically using Perinci::CmdLine::Gen version 0.501

use 5.010001;
use strict;
use warnings;
use Log::ger;

use Perinci::CmdLine::Any;

our $AUTHORITY = 'cpan:PERLANCAR'; # AUTHORITY
our $DATE = '2022-03-13'; # DATE
our $DIST = 'App-corruptor'; # DIST
our $VERSION = '0.003'; # VERSION

my $cmdline = Perinci::CmdLine::Any->new(
    url => "/App/corruptor/corruptor",
    program_name => "corruptor",
    log => 1,
);

$cmdline->run;

# ABSTRACT: Corrupt files by writing some random bytes/blocks to them
# PODNAME: corruptor

__END__

=pod

=encoding UTF-8

=head1 NAME

corruptor - Corrupt files by writing some random bytes/blocks to them

=head1 VERSION

This document describes version 0.003 of corruptor (from Perl distribution App-corruptor), released on 2022-03-13.

=head1 SYNOPSIS

Usage:

% B<corruptor> [B<--config-path>=I<path>|B<-c>|B<--no-config>|B<-C>] [B<--config-profile>=I<profile>|B<-P>] [B<--debug>|B<--log-level>=I<level>|B<--quiet>|B<--trace>|B<--verbose>] [B<--dry-run>|B<-n>] [(B<--file>=I<filename>)+] [B<--format>=I<name>|B...

=head1 DESCRIPTION

This utility can be used in disk/filesystem testing. It corrupts files by
writing random bytes/blocks to them.

=head1 OPTIONS

C<*> marks required options.

=head2 Main options

=over

=item B<--file>=I<s@>*

Can also be specified as the 1st command-line argument and onwards.

Can be specified multiple times.

=item B<--files-json>=I<s>

See C<--file>.

Can also be specified as the 1st command-line argument and onwards.

=item B<--proportion>=I<s>*, B<-p>

How much random data is written as proportion of file size (in percent).

=back

=head2 Configuration options

=over

=item B<--config-path>=I<s>, B<-c>

Set path to configuration file.

=item B<--config-profile>=I<s>, B<-P>

Set configuration profile to use.

=item B<--no-config>, B<-C>

Do not use any configuration file.

=back

=head2 Environment options

=over

=item B<--no-env>

Do not read environment for default options.

=back

=head2 Logging options

=over

=item B<--debug>

Shortcut for --log-level=debug.

=item B<--log-level>=I<s>

Set log level.

=item B<--quiet>

Shortcut for --log-level=error.

=item B<--trace>

Shortcut for --log-level=trace.

=item B<--verbose>

Shortcut for --log-level=info.

=back

=head2 Output options

=over