... $tks->signal_connect( 'clicked' => sub { my $command = "tw pro:$currproj"; my $ret = fork(); if($ret == 0) { # this is the fork: become $command and go away. exec("gnome-terminal", "-e", "bash -c '$command; bash'"); } else { # this is the parent: do nothing and go ahead. } return FALSE; } ); #### 2504 ? 00:00:01 perl 2509 ? 00:00:01 gnome-terminal 2573 ? 00:00:01 gnome-terminal 2638 ? 00:00:01 gnome-terminal 2702 ? 00:00:01 gnome-terminal 2767 ? 00:00:00 gnome-terminal 2773 ? 00:00:00 gnome-pty-helpe