j'ai un script perl/tk qui lance certaines commandes et attend le code
retour.
Ainsi je fais par exemple un ssh cyril@dev date et je recupere la date
( c'est qu'un exemple )
Mais cela m'ouvre une fenetre dos alors que je ne voudrais avoir que
mon interface tk !!!
Je precise que j'utilise cygwin pour avoir pas mal de commandes unix.
J'ai deja essaye la commande run ( de cygwin ) mais elle ne fonctionne
pas correctement dans certaines conditions.
J'ai trouve l'utilitaire nircmdc mais il n'attend pas la fin de la
commande et cela genere pas mal de soucis car je dois mixer les chemins
windows et les chemins unix.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Dave
"Srand" wrote in message news:
Salut,
j'ai un script perl/tk qui lance certaines commandes et attend le code retour. Ainsi je fais par exemple un ssh date et je recupere la date ( c'est qu'un exemple ) Mais cela m'ouvre une fenetre dos alors que je ne voudrais avoir que mon interface tk !!! Je precise que j'utilise cygwin pour avoir pas mal de commandes unix.
J'ai deja essaye la commande run ( de cygwin ) mais elle ne fonctionne pas correctement dans certaines conditions.
J'ai trouve l'utilitaire nircmdc mais il n'attend pas la fin de la commande et cela genere pas mal de soucis car je dois mixer les chemins windows et les chemins unix.
Merci d'avance.
use Win32::Console; Win32::Console::Free();
"Srand" <cyril.scetbon@free.fr> wrote in message
news:1133559589.205138.84840@g43g2000cwa.googlegroups.com...
Salut,
j'ai un script perl/tk qui lance certaines commandes et attend le code
retour.
Ainsi je fais par exemple un ssh cyril@dev date et je recupere la date
( c'est qu'un exemple )
Mais cela m'ouvre une fenetre dos alors que je ne voudrais avoir que
mon interface tk !!!
Je precise que j'utilise cygwin pour avoir pas mal de commandes unix.
J'ai deja essaye la commande run ( de cygwin ) mais elle ne fonctionne
pas correctement dans certaines conditions.
J'ai trouve l'utilitaire nircmdc mais il n'attend pas la fin de la
commande et cela genere pas mal de soucis car je dois mixer les chemins
windows et les chemins unix.
j'ai un script perl/tk qui lance certaines commandes et attend le code retour. Ainsi je fais par exemple un ssh date et je recupere la date ( c'est qu'un exemple ) Mais cela m'ouvre une fenetre dos alors que je ne voudrais avoir que mon interface tk !!! Je precise que j'utilise cygwin pour avoir pas mal de commandes unix.
J'ai deja essaye la commande run ( de cygwin ) mais elle ne fonctionne pas correctement dans certaines conditions.
J'ai trouve l'utilitaire nircmdc mais il n'attend pas la fin de la commande et cela genere pas mal de soucis car je dois mixer les chemins windows et les chemins unix.
Merci d'avance.
use Win32::Console; Win32::Console::Free();
Srand
use Win32::Console; Win32::Console::Free(); use Tk; sub do_ssh; $mw=MainWindow->new; $mw->Button(-text=>'ssh',-command=>&do_ssh)->pack; MainLoop;
sub do_ssh { $host=''; my $output=`ssh $host date`; print $output,$/; }
ne fonctionne pas mieux
use Win32::Console;
Win32::Console::Free();
use Tk;
sub do_ssh;
$mw=MainWindow->new;
$mw->Button(-text=>'ssh',-command=>&do_ssh)->pack;
MainLoop;
sub do_ssh
{
$host='user@server';
my $output=`ssh $host date`;
print $output,$/;
}