# NAME Text::Schmutz - YouĚr screen is quitĚŁe dirty, please cleaĚn it. # VERSION version v0.1.1 # SYNOPSIS ```perl use Text::Schmutz; my $s = Text::Schmutz->new( prob => 0.1, use_small => 1 ); say $s->mangle($text); ``` # DESCRIPTION "ThĚoughĚtĚs of dĚŁirt spill ĚľoĚveĚr to ĚyoÍur ĚuĚnicoÍdeĚ Íenabled tĚľext" This is a Perl adaptation of `schmutz.go` by Clemens Fries <github-schmutz@xenoworld.de>. # ATTRIBUTES ## prob This is the probability that a character will be dirty, between 0 and 1. It defaults to 0.1. ## use\_small "spray dust on your text". If ["use\_large"](#use_large) and ["strike\_out"](#strike_out) are not enabled, then this is enabled by default. For example: ``` LĚŁorem iĚpsĚum ĚdolĚŁor sit amet, conseĚcteĚtĚŁur adipiscing elĚŁitĚ, ĚseĚd ĚdĚo eiusmĚŁoĚd ĚŁtempor inciĚŁdĚŁidĚunt ut laĚŁbore ĚŁeĚt doloĚre ĚŁmaĚgnaĚ ĚŁaliqĚuaĚ. ``` ## use\_large "a cookie got mangled in your typewriter" For example, with ["prob"](#prob) set to 0.5: ``` LĚoreĚm ÍipsumÍ dolÍorÍ sit amÍeÍtĚ, ÍconsÍectetĚur ÍaĚdĚľiĚpiscĚinĚg elĚľiÍtÍ,Í sĚľeÍdÍ doĚ eiÍusmÍodĚ ÍtempĚor ÍiĚľnĚcÍididĚľuĚnt ut ĚlaĚboĚrĚľe ĚľetĚľ ĚľdoloreĚ maĚľgnÍaÍ ÍalĚľiĚquaÍ.Ěľ ``` ## strike\_out "this is unacceptable" For example, with ["prob"](#prob) set to 1.0: ``` LâŤoârâŤe̡mâ âiâĽpâsĚśuâm⼠âŤdâoâĽlâoĚľr⌠̜sĚśiâŤt̸ ĚśaâĽmĚśeâtĚś,⼠̾câŤoâĽnâs̡eâcĚľtâeâtĚśuĚśr⍠âĽaâdâĽiĚśpĚľiĚľs̡c̸iânâgâ Ěľe̸lâŚiâtâ,Ěľ âĽsĚľeâĽd̸ ĚľdĚśoĚś ̡eĚľiâĽuĚľsâmâoâŤdĚś ̸tĚśeâm̸pâoâŚrâ âi̡nâĽcâŤiâdâĽiĚľd̡u̡nĚśt̸ Ěľu̡t⼠̜l̡aâŚbâĽoĚľrâeâ âeĚľt̸ ̸dâŚo̸lĚľoĚľrâeĚś âm̡a̡g̡nĚľaĚľ ĚľaâŚl̡i̡qâĽu̸aĚś.â ``` # METHODS ## mangle ``` $dirty = $s->mangle( $text, $prob ); ``` # SOURCE The development version is on github at [https://github.com/robrwo/perl-Text-Schmutz](https://github.com/robrwo/perl-Text-Schmutz) and may be cloned from [git://github.com/robrwo/perl-Text-Schmutz.git](git://github.com/robrwo/perl-Text-Schmutz.git) # BUGS Please report any bugs or feature requests on the bugtracker website [https://github.com/robrwo/perl-Text-Schmutz/issues](https://github.com/robrwo/perl-Text-Schmutz/issues) When submitting a bug or request, please include a test-file or a patch to an existing test-file that illustrates the bug or desired feature. # AUTHOR Robert Rothenberg <rrwo@cpan.org> The original [schmutz](https://github.com/githubert/schmutz) was written by Clemens Fries <github-schmutz@xenoworld.de>. # COPYRIGHT AND LICENSE This software is Copyright (c) 2024 by Robert Rothenberg. This is free software, licensed under: ``` The GNU General Public License, Version 3, June 2007 ```