[rt.cpan.org #78208] how use with CREATE_NO_WINDOW and without in one script?
[email protected] ("Stefan Gipper via RT")
| Newsgroups | perl.libwin32 |
|---|---|
| Message-ID | <[email protected]> |
Wed Jul 04 20:02:47 2012: Request 78208 was acted upon.
Transaction: Ticket created by STEFANOS
Queue: Win32-Process
Subject: how use with CREATE_NO_WINDOW and without in one script?
Broken in: 0.14
Severity: Normal
Owner: Nobody
Requestors: [email protected]
Status: new
Ticket <URL: https://rt.cpan.org/Ticket/Display.html?id=78208 >
how use with CREATE_NO_WINDOW and without in one script?
Workaround with win32::gui with Win32::GUI::Hide and Win32::GUI::Show
works but is not really good solution. Better solution possible?
example as attachment
win32process.pl
(application/octet-stream, 474 B)
#!/usr/bin/perl
use Win32::Process qw(NORMAL_PRIORITY_CLASS CREATE_NO_WINDOW);
Win32::Process::Create($ProcessObj,
"C:\\Windows\\System32\\echo.exe",
"",
0,
NORMAL_PRIORITY_CLASS,
".");
delete $INC{'Win32/Process.pm'};#not work?
use Win32::Process qw(NORMAL_PRIORITY_CLASS CREATE_NEW_CONSOLE);# not without CREATE_NO_WINDOW ?
Win32::Process::Create($ProcessObj,
"C:\\Windows\\System32\\echo.exe",
"",
0,
NORMAL_PRIORITY_CLASS,
".");
exit;