Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change

Upside Down Text Revisted

by PilotinControl (Pilgrim)
on Mar 02, 2013 at 13:59 UTC ( #1021414=perlquestion: print w/replies, xml ) Need Help??
PilotinControl has asked for the wisdom of the Perl Monks concerning the following question:

Hello Monks! I have a updated my question and the code is below. Simply put I am trying to use the Upside down Text module and here is my updated code Thanks!

use warnings; use strict; use auto; use Text::UpsideDown; use Win32::Unicode::Console; use Win32::Console; print ("TEST RIGHT SIDE UP\n"); printW upside_down ("TEST UPSIDE DOWN\n"); printW upside_down ("I \x{2665} Perl\n\n"); sleep (10); Output on Screen: TEST RIGHT SIDE UP ?MO? ??I??

How do I rectify this code? Thanks!

Replies are listed 'Best First'.
Re: Upside Down Text
by moritz (Cardinal) on Mar 02, 2013 at 14:18 UTC

    Maybe your terminal window isn't configured to work with UTF-8? Then producing valid UTF-8 won't really help you at all.

    When I remove all the unnecessary modules, your code works fine for me under linux, with a terminal configured to use UTF-8.

Re: Upside Down Text (chcp 65001)
by Anonymous Monk on Mar 02, 2013 at 14:22 UTC

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://1021414]
Approved by moritz
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (5)
As of 2018-04-27 05:19 GMT
Find Nodes?
    Voting Booth?