Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine
 
PerlMonks  

Function 'system' nasty behaviour in Cygwin Perl/Tk

by jesuashok (Curate)
on Jan 31, 2006 at 02:34 UTC ( #526642=perlquestion: print w/ replies, xml ) Need Help??
jesuashok has asked for the wisdom of the Perl Monks concerning the following question:

Hi All,

I've recently installed latest x-Cygwin on different PCs and suddenly discovered strange reaction on 'system' function inside Perl/Tk apps. Naturally, console applications running well with this function. Below you can see my snippet code and stuff it prints.

FELIX-XP-~> cat test.pl

#!/usr/bin/perl # Code automatically generated by VPTK_W use strict; use Tk; use Tk::Button; my $mw=MainWindow->new(-title=>'Bug demo'); my $w_Button_001 = $mw -> Button ( -background=>'green4', -foreground=>'Yellow', -text=>'Exit', -command=>sub {exit} ) -> pack() +; my $w_Button_002 = $mw -> Button ( -background, 'Yellow', -foreground, 'Black', -command, sub{system('echo Hello'=>'')}, -text, 'Magic 0' ) -> pack(); my $w_Button_003 = $mw -> Button ( -background, 'Red', -foreground, 'Yellow', -command, sub{system('xterm'=>'')}, -text, 'Magic 1' ) -> pack(); MainLoop;

#===vptk end===< DO NOT CODE ABOVE THIS LINE >=== FELIX-XP-~> test.pl C:\cygwin\bin\perl.exe (3064): *** unable to remap C:\cygwin\bin\cygz.dll to same address as parent(0xE00000) != 0xE10000 9 [main] perl 2168 fork_parent: child 3064 died waiting for dll loading Background Error: panic: MUTEX_LOCK (45) [op.c:354] at /usr/lib/perl5/vendor_perl/5.8/cygwin/Tk.pm line 406. panic: MUTEX_LOCK (45) [op.c:354].



Any help/suggestion will be highly appreciated,
"Keep pouring your ideas"

Edit: g0n - code tags around output

2006-10-07 Unapproved by planetscape once evidence of habitual plagiarism uncovered.

Comment on Function 'system' nasty behaviour in Cygwin Perl/Tk
Select or Download Code
Replies are listed 'Best First'.
Re: Function 'system' nasty behaviour in Cygwin Perl/Tk
by liverpole (Monsignor) on Oct 06, 2006 at 11:40 UTC
    Posted here on December 28, 2005:
    Hi All, I've recently installed latest x-Cygwin on different PCs and suddenly discovered strange reaction on 'system' function inside Perl/Tk apps. Naturally, console applications running well with this function. Below you can see my snippet code and stuff it prints. FELIX-XP cat test.pl #!/usr/bin/perl # Code automatically generated by VPTK_W use strict; use Tk; use Tk::Button; my $mw=MainWindow->new(-title=>'Bug demo'); my $w_Button_001 = $mw -Button ( -background=>'green4', -foreground=>'Yellow', -text=>'Exit', -command=>sub {exit} ) -pack(); my $w_Button_002 = $mw -Button ( -background, 'Yellow', -foreground, 'Black', -command, sub{system('echo Hello'=>'')}, -text, 'Magic 0' ) -pack(); my $w_Button_003 = $mw -Button ( -background, 'Red', -foreground, 'Yellow', -command, sub{system('xterm'=>'')}, -text, 'Magic 1' ) -> pack(); MainLoop;
    and signed with the name Felix, which jesuashok removed:
    Any help/suggestion will be highly appreciated, Felix.

    s''(q.S:$/9=(T1';s;(..)(..);$..=substr+crypt($1,$2),2,3;eg;print$..$/
Re: Function 'system' nasty behaviour in Cygwin Perl/Tk
by Baramin (Acolyte) on Feb 01, 2006 at 13:24 UTC
    Most likely a cygwin problem.
    You should try the rebaseall utility in cygwin's rebase package.

    If needed, consider the "-T" option to rebaseall to specify the dlls you'll be using.

    more info HERE

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://526642]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (13)
As of 2015-07-08 05:25 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (94 votes), past polls