Help for this page

Select Code to Download


  1. or download this
    $str = "\033";    # ESC
$str = chr(033);  # ESC
  2. or download this
    while (<DATA>) {
   s/\\\\033/\033/g;  # \\033 -> ESC
...
__DATA__
\\033[0;30mcolor1
\\033[0;31mcolor2