use Win32::Console; my $CONSOLE = new Win32::Console(); $CONSOLE->Title($0);