사용자 도구

사이트 도구


develop:perl:module:win32_console_ansi

차이

문서의 선택한 두 판 사이의 차이를 보여줍니다.

차이 보기로 링크

양쪽 이전 판 이전 판
다음 판
이전 판
develop:perl:module:win32_console_ansi [2009/07/15 09:18]
starlits
develop:perl:module:win32_console_ansi [2009/07/15 10:03] (현재)
starlits
줄 5: 줄 5:
   - Windows NT/2000/XP/Vista 는 Win32 Console 에서 ANSI 를 지원하지 않습니다.   - Windows NT/2000/XP/Vista 는 Win32 Console 에서 ANSI 를 지원하지 않습니다.
   - 이전 MS-DOS 시절의 command.com 에서만 지원됩니다. cmd.exe 는 지원되지 않습니다.   - 이전 MS-DOS 시절의 command.com 에서만 지원됩니다. cmd.exe 는 지원되지 않습니다.
 +  - Win32::Console::ANSI 설치를 통해 cmd.exe 에서도 color 를 마음대로 표현할 수 있습니다.
  
 ===== Colors rendition ===== ===== Colors rendition =====
 +
 +{{:develop:perl:module:ansi_colors.png|}}
  
 ===== Characters conversion ===== ===== Characters conversion =====
 +
 +{{:develop:perl:module:ansi_char.png|}}
  
 ===== Extra escape sequence ===== ===== Extra escape sequence =====
 +{{:develop:perl:module:ansi_codepage.png|}}
  
 ===== Download & Install ===== ===== Download & Install =====
 +  - Current version is 1.04 
 +  - Download & Installation <code>
 +ppm install http://www.bribes.org/perl/ppm/Win32-Console-ANSI.ppd 
 +ppm install http://www.adminschool.net/perl/ppm/Win32-Console-ANSI.ppd 
 +</code>
 +  - Source file : [[http://www.bribes.org/perl/Win32-Console-ANSI-1.04.tar.gz | Win32-Console-ANSI-1.04.tar.gz ]]
 +
 +===== Sample Code =====
 +
 +  * 모듈이 설치되었다면 아래의 샘플코드를 돌려보라! <code perl>
 +#!/usr/bin/perl                            -w -w -w -w -w
 +eval{     require                        Win32::Console::ANSI;
 +};sub      ::{printf                  @_ } sub            sub{
 +rand          39/999}               sub O123                 {::
 +""            ."\e[%d"            .";%dH%s"                  ,@_
 +;};               sub l234      {O123 $|=                    1
 +,1,                 "\e[J"  while(1)                      {
 +$c                    or do {::"\e[1"                    ."".
 + ""                    .";%dm", 30+                     rand
 +  7 ;                  l234;$u=&sub                  ;$v =
 +   &sub                ;$ c= 3999                 ;$b=qw
 +    /19 9            1/[int rand 3             ]};O123
 +     11*sin(      $v* $c)+    13,39*cos   ($u*$c)+41,
 +       qw+J A P H+[$c%4]        ;($a++%$b)or$c--;}
 +</code>
  
 ===== Links ===== ===== Links =====
   - [원문] http://www.bribes.org/perl/wANSIConsole.html   - [원문] http://www.bribes.org/perl/wANSIConsole.html
 +  - http://www.bribes.org/perl/ansi.html 개념 및 예제소스
develop/perl/module/win32_console_ansi.1247617088.txt.gz · 마지막으로 수정됨: 2009/07/15 09:18 저자 starlits