The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Acme::Letter - Perl extension for drawing beautiful letter

SYNOPSIS

  use Acme::Letter;
  #create an Acme::Letter object
  $letter = Acme::Letter->new();
  $string = 'PDF::API 2'; 
  $letter->printString($string);

DESCRIPTION

This module draw several lines which like a letter. It is beautiful! You can draw string with letter, colon and dot. Now I have no idea how to desgin number. So you need to draw it by yourself.

Methods

  • $letter->printLetter($arg)

    get a letter, such as a-z or A-Z, return several lines which like a letter.

  • $letter->printString($string);

    get a string, return several lines which like a letter. The String include dot, colon.

  • $letter-saveToFile($string,$filename)

    get a letter, such as a-z or A-Z, create several lines and put into a file named $filename.

Examples

  • Examples foreach @Letter.

    A.

        _
       / \
      / _ \
     / ___ \
    /_/   \_\

    B.

     _____
    |  _  \
    |_|_)_/
    | |_) \
    |_____/

    C.

      _____
     /  ___|
    |  /
    |  \___
     \_____|
    
     D.
    
     _____
    |  _  \
    | | \  |
    | |_/  |
    |_____/

    E.

     _____
    |  ___|
    | |__
    | |___
    |_____|

    F.

     _____
    |  ___|
    | |_
    |  _|
    |_|

    H.

     _   _
    | | | |
    |_|_|_|
    | | | |
    |_| |_|

    I.

     _____
    |__ __|
      | |
     _|_|_
    |_____|

    J.

     _____
    |__ __|
      | |
     _| |
     \_/

    K.

     _   _
    | | //
    | |//
    | |\\
    |_| \\

    L.

     _
    | |
    | |
    | |___
    |_____)

    N.

     _    _
    |  \ | |
    | |\\| |
    | | \| |
    |_|  \_|

    O.

      _____  
     /  _  \ 
    |  / \  |
    |  \_/  | 
     \_____/ 

    P.

     ____ 
    |  _ \
    | |_) |
    |  __/
    |_|

    R.

     ____ 
    |  _ \
    | |_) |
    | |  /
    |_|\_\

    T.

     _____
    |__ __|
      | |
      | |
      |_|

    M.

     _      _
    |  \  /  |
    | |\\//| |
    | | \/ | |
    |_|    |_|

    G.

     _____ 
    /  ___|
    | / __
    | \___|
    \_____|

    S.

      ___
     /___|
     \\_ 
      __\\
     |___/

    U.

     _    _
    | |  | |
    | |  | |
    | \__/ |
     \____/

    V.

     __      __
     \ \    / /
      \ \  / /
       \ \/ /
        \__/

    X.

     _    _
    \ \  / /
     \ \/ /
     / /\ \
    /_/  \_\

    Y.

     _    _
    \ \  / /
     \_\/_/
       | |
       |_|

    Z.

     _____
    |__   |
    |  / /
      / /___
     |______|

    Q.

      ____ 
     /  _ \
    |  (_| |
     \ __  |
         |_|
  • Example for dot and colon

    dot.

     _
    (_)

    colon.

     _
    (_)
     _
    (_)
  • Example for Number

    2.

     ____    
    |___ \   
      __) |  
     / __    
    |_____|  

AUTHOR

Lei Xue (carmark@cpan.org/carmark.xue@gmail.com)

COPYRIGHT AND LICENSE

Copyright (C) 2010 by Lei Xue

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.10.1 or, at your option, any later version of Perl 5 you may have available.

I love my girl, XiaoFu!