Text::Pipe::RandomCase - Text::Pipe filter to randomize character case
use Text::Pipe qw(PIPE); print PIPE('RandomCase')->filter('foobar'); print PIPE('RandomCase', probability => 2 )->filter('foobar');
This module provides a pipe segment for Text::Pipe to randomly uppercase the characters of a string. All of the described methods can also be used as paramters to its constructor.
Determines the frequency of upper case characters. Any 1/$arg'th character will be uppercased on average. Defaults to undef, in which case this module will return strings with a probability of 1/4 for any character to be uppercased.
If given a true value - in the Perl sense, i.e. anything except undef, 0 or the empty string, any string will have at least one uppercased character in a random position. If no argument is given, it returns the slot's value. Default to false.
Mario Domgoergen <email@example.com>
Please report any bugs or feature requests to
bug-text-pipe-randomcase at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Text-Pipe-RandomCase. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.
You can find documentation for this module with the perldoc command.
You can also look for information at:
Copyright 2008-2009 Mario Domgoergen.
This program is free software; you can redistribute it and/or modify it under the terms the GNU General Public License as published by the Free Software Foundation; either version 1, or (at your option) any later version.