NAME
Text::Beautify - Beautifies text
SYNOPSIS
use Text::Beautify;
$text = "badly written text ,,you know ?"
$new_text = beautify($text);
# $new_text now holds "Badly written text, you know?"
enable_feature('repeated_punctuation'); # enables the feature
disable_feature('trailing_space'); # disables the feature
@features_enables = enabled_features();
@all_features = features();
enable_all();
disable_all();
DESCRIPTION
Beautifies text. This involves operations like squeezing double spaces, removing spaces from the beginning and end of lines, upper casing the first character in a string, etc.
You can enable / disable features with enable_feature / disable_feature. These commands return a true value if they are successful.
To know which features are beautified, see FEATURES
FEATURES
All features are enabled by default
heading_space
Removes heading spaces
trailing_space
Removes trailing spaces
double_spaces
Squeezes double spaces
repeated_punctuation
Squeezes repeated punctuation
space_in_front_of_punctuation
Removes spaces in front of punctuation
space_after_punctuation
Puts a spaces after punctuation
uppercase_first
Uppercases the first character in the string
MESSAGE FROM THE AUTHOR
If you're using this module, please drop me a line to my e-mail. Tell me what you're doing with it. Also, feel free to suggest new bugs^H^H^H^H^H features.
AUTHOR
Jose Alves de Castro, <cog [at] cpan [dot] org<gt>
COPYRIGHT AND LICENSE
Copyright 2004 by Jose Alves de Castro
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.