Beefy Boxes and Bandwidth Generously Provided by pair Networks
Pathologically Eclectic Rubbish Lister
 
PerlMonks  

Re: Function 'system' nasty behaviour in Cygwin Perl/Tk

by liverpole (Monsignor)
on Oct 06, 2006 at 11:40 UTC ( [id://576646]=note: print w/replies, xml ) Need Help??


in reply to Function 'system' nasty behaviour in Cygwin Perl/Tk

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$..$/

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others having a coffee break in the Monastery: (7)
As of 2024-04-25 08:23 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found