Help for this page

Select Code to Download


  1. or download this
    perl -MWin32::Console -e"Win32::Console->new(STD_OUTPUT_HANDLE)->Windo
+w(1, 0, 0, 50,50);"
  2. or download this
    C:\test>perl -Mstrict -MWin32::Console -we"Win32::Console->new(STD_OUT
+PUT_HANDLE)->Window(1, 0, 0, 50,500) or die $^E;"
The parameter is incorrect at -e line 1.
  3. or download this
    #! perl -slw
use strict;
...

$OUT->Attr( $origAttr );
$OUT->Cls;