The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
NAME
    Acme::AwesomeQuotes - Make your text awesome!

VERSION
    version 0.02

SYNOPSIS
      use Acme::AwesomeQuotes;
      my $awesome_text = GetAwesome('Wyld Stallyns');
      say q(I'm Bill S. Preston, Esquire!);
      say q(And I'm Ted "Theodore" Logan!);
      say ('And we are ', $awesome_text, '!');

DESCRIPTION
    Tired of ordinary quotation marks that lack punch?

    Looking for something that can better convey just how *awesome* your
    words are?

    You need `àwesome quoteś´!

FUNCTIONS
  GetAwesome
    "GetAwesome()" is the module’s only function, and is exported by
    default. It takes a single scalar string argument, and returns that
    string with the following changes applied:

    *   a grave accent (or backtick, U+0060) is prepended;

    *   a combining grave accent is added to the first letter;

    *   a combining acute accent is added to the final letter;

    *   an acute accent (U+00B4) is appended;

    In addition, leading/trailing whitespace and punctuation is stripped,
    and the returned string is in NFC.

    Combining characters already present in the string are respected, and
    existing initial/terminal grave/acute accents will not be doubled.
    However, in cases where both a grave and acute accent may be applied –
    such as if the initial letter has an acute accent, or if the string
    consists of only a single letter – a caron is used instead, because
    combining grave and acute accents on the same character doesn’t look so
    hot. :)

LIMITATIONS
    *   N.B. that the first and last characters of the supplied string must
        be *letters*; leading/trailing whitespace and punctuation will be
        stripped, and if the resulting first/last character is not a letter
        an exception will be raised. Letters may be from any script covered
        by Unicode. Because leading/trailing punctuation is stripped, if
        your text is to go e.g. at the end of a sentence, you should apply
        the full-stop *after* calling "GetAwesome()".

    *   The returned string is in NFC; combining accents will therefore
        occur as separate characters only if there is no code point for the
        corresponding character+accent.

    *   A string that is already in `àwesome quoteś´ cannot be made *more*
        awesome by calling the function on it repeatedly. :)

BUGS
    None known, doubtless many undiscovered.

SEE ALSO
    Acme::LeetSpeak
    <http://search.cpan.org/~jmadler/Acme-LeetSpeak-0.01/lib/Acme/LeetSpeak.
    pm>

ACKNOWLEDGEMENTS
    Thanks to the regulars on <irc://irc.perl.org/perl> for the idea. Thanks
    to Ævar Arnfjörð Bjarmason (avar, <http://search.cpan.org/~avar/>) for
    helpful suggestions on packaging.

AUTHOR
    Marcus Smith <carwash@cpan.org>

COPYRIGHT AND LICENSE
    This software is copyright (c) 2010 by Marcus Smith.

    This is free software; you can redistribute it and/or modify it under
    the same terms as the Perl 5 programming language system itself.