App-corruptor
view release on metacpan or search on metacpan
"Test::Pod" : "1.41",
"Test::Pod::Coverage" : "1.08",
"Test::Rinci" : "0.151"
},
"x_spec" : {
"Rinci" : "v1.1.100"
}
},
"runtime" : {
"requires" : {
"Data::Sah::Coerce::perl::To_float::From_str::as_percent" : "0",
"Data::Sah::Coerce::perl::To_float::From_str::percent" : "0",
"Data::Sah::Compiler::perl::TH::array" : "0.911",
"Data::Sah::Compiler::perl::TH::float" : "0.911",
"Data::Sah::Compiler::perl::TH::str" : "0.911",
"Data::Sah::Filter::perl::Path::expand_tilde_when_on_unix" : "0",
"Data::Sah::Filter::perl::Path::strip_slashes_when_on_unix" : "0",
"Log::ger" : "0.038",
"Perinci::CmdLine::Any" : "0.152",
"Perinci::CmdLine::Lite" : "1.915",
"Sah::Schema::filename" : "0",
"Sah::Schema::percent" : "0",
"perl" : "5.010001",
"strict" : "0",
"warnings" : "0"
}
},
"test" : {
"requires" : {
"File::Spec" : "0",
"IO::Handle" : "0",
"IPC::Open3" : "0",
license: perl
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
version: '1.4'
name: App-corruptor
provides:
App::corruptor:
file: lib/App/corruptor.pm
version: '0.003'
requires:
Data::Sah::Coerce::perl::To_float::From_str::as_percent: '0'
Data::Sah::Coerce::perl::To_float::From_str::percent: '0'
Data::Sah::Compiler::perl::TH::array: '0.911'
Data::Sah::Compiler::perl::TH::float: '0.911'
Data::Sah::Compiler::perl::TH::str: '0.911'
Data::Sah::Filter::perl::Path::expand_tilde_when_on_unix: '0'
Data::Sah::Filter::perl::Path::strip_slashes_when_on_unix: '0'
Log::ger: '0.038'
Perinci::CmdLine::Any: '0.152'
Perinci::CmdLine::Lite: '1.915'
Sah::Schema::filename: '0'
Sah::Schema::percent: '0'
perl: '5.010001'
strict: '0'
warnings: '0'
resources:
bugtracker: https://rt.cpan.org/Public/Dist/Display.html?Name=App-corruptor
homepage: https://metacpan.org/release/App-corruptor
repository: git://github.com/perlancar/perl-App-corruptor.git
version: '0.003'
x_Dist_Zilla:
perl:
Makefile.PL view on Meta::CPAN
"DISTNAME" => "App-corruptor",
"EXE_FILES" => [
"script/corruptor",
"script/corruptor-total",
"script/corruptor-zero"
],
"LICENSE" => "perl",
"MIN_PERL_VERSION" => "5.010001",
"NAME" => "App::corruptor",
"PREREQ_PM" => {
"Data::Sah::Coerce::perl::To_float::From_str::as_percent" => 0,
"Data::Sah::Coerce::perl::To_float::From_str::percent" => 0,
"Data::Sah::Compiler::perl::TH::array" => "0.911",
"Data::Sah::Compiler::perl::TH::float" => "0.911",
"Data::Sah::Compiler::perl::TH::str" => "0.911",
"Data::Sah::Filter::perl::Path::expand_tilde_when_on_unix" => 0,
"Data::Sah::Filter::perl::Path::strip_slashes_when_on_unix" => 0,
"Log::ger" => "0.038",
"Perinci::CmdLine::Any" => "0.152",
"Perinci::CmdLine::Lite" => "1.915",
"Sah::Schema::filename" => 0,
"Sah::Schema::percent" => 0,
"strict" => 0,
"warnings" => 0
},
"TEST_REQUIRES" => {
"File::Spec" => 0,
"IO::Handle" => 0,
"IPC::Open3" => 0,
"Test::More" => 0
},
"VERSION" => "0.003",
"test" => {
"TESTS" => "t/*.t"
}
);
my %FallbackPrereqs = (
"Data::Sah::Coerce::perl::To_float::From_str::as_percent" => 0,
"Data::Sah::Coerce::perl::To_float::From_str::percent" => 0,
"Data::Sah::Compiler::perl::TH::array" => "0.911",
"Data::Sah::Compiler::perl::TH::float" => "0.911",
"Data::Sah::Compiler::perl::TH::str" => "0.911",
"Data::Sah::Filter::perl::Path::expand_tilde_when_on_unix" => 0,
"Data::Sah::Filter::perl::Path::strip_slashes_when_on_unix" => 0,
"File::Spec" => 0,
"IO::Handle" => 0,
"IPC::Open3" => 0,
"Log::ger" => "0.038",
"Perinci::CmdLine::Any" => "0.152",
"Perinci::CmdLine::Lite" => "1.915",
"Sah::Schema::filename" => 0,
"Sah::Schema::percent" => 0,
"Test::More" => 0,
"strict" => 0,
"warnings" => 0
);
unless ( eval { ExtUtils::MakeMaker->VERSION(6.63_03) } ) {
delete $WriteMakefileArgs{TEST_REQUIRES};
delete $WriteMakefileArgs{BUILD_REQUIRES};
$WriteMakefileArgs{PREREQ_PM} = \%FallbackPrereqs;
by writing random bytes/blocks to them.
This function is not exported.
This function supports dry-run operation.
Arguments ('*' denotes required arguments):
* files* => *array[filename]*
* proportion* => *percent*
How much random data is written as proportion of file size (in
percent).
Special arguments:
* -dry_run => *bool*
Pass -dry_run=>1 to enable simulation mode.
Returns an enveloped result (an array).
First element ($status_code) is an integer containing HTTP-like status
lib/App/corruptor.pm view on Meta::CPAN
This utility can be used in disk/filesystem testing. It corrupts files by
writing random bytes/blocks to them.
_
args => {
%argspec0_files,
# XXX arg: block mode or byte mode
proportion => {
summary => 'How much random data is written '.
'as proportion of file size (in percent)',
schema => ['percent*', xmin=>0, max=>100],
req => 1,
cmdline_aliases => {p=>{}},
},
},
features => {
dry_run => 1,
},
examples => [
{
summary => 'Corrupt two files by writing 1% random bytes',
lib/App/corruptor.pm view on Meta::CPAN
This function supports dry-run operation.
Arguments ('*' denotes required arguments):
=over 4
=item * B<files>* => I<array[filename]>
=item * B<proportion>* => I<percent>
How much random data is written as proportion of file size (in percent).
=back
Special arguments:
=over 4
=item * B<-dry_run> => I<bool>
script/corruptor view on Meta::CPAN
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.
script/corruptor view on Meta::CPAN
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.
( run in 0.396 second using v1.01-cache-2.11-cpan-05162d3a2b1 )