Bonsoir, Le 21/06/2014 13:55, Diogene Laerce a écrit :
> Si ca peut aider : j'utilise ce script dans ~/gnome2/nautilus-script : > > ************************************************************************ > > #!/usr/bin/perl -w > # > # Open terminal here > # > # Nautilus script that opens a gnome-terminal at the current location, > if it's > # a valid one. This could be done in shell script, but I love Perl!. > # > # 20020930 -- Javier Donaire <jy...@fraguel.org> > # http://www.fraguel.org/~jyuyu/ > # Licensed under the GPL v2+ > # > # Modified by: Dexter Ang [thep...@mydestiny.net] > # 2003-12-08: Modified for Gnome 2.4 > # - Added checking if executed on Desktop "x-nautilus-desktop:///" > # so that it opens in /home/{user}/Desktop > > use strict; > > $_ = $ENV{'NAUTILUS_SCRIPT_CURRENT_URI'}; > if ($_ and m#^file:///#) { > s/%([0-9A-Fa-f]{2})/chr(hex($1))/eg; > s#^file://##; > exec "gnome-terminal --working-directory='$_'"; > } > > # Added 2003-12-08 Dexter Ang > if ($_ == "x-nautilus-desktop:///") { > $_ = $ENV{'HOME'}; > $_ = $_.'/Desktop'; > exec "gnome-terminal --working-directory='$_'"; > } > > ******************************************************************* Je te remercie mais, mon problème étant finalement résolu, je pense que ça ne me sera pas utile. En revanche, en lisant ton script, je m'aperçois que je suis encore loin de maîtriser le Perl... ;) -- François Lafont -- Lisez la FAQ de la liste avant de poser une question : http://wiki.debian.org/fr/FrenchLists Pour vous DESABONNER, envoyez un message avec comme objet "unsubscribe" vers debian-user-french-requ...@lists.debian.org En cas de soucis, contactez EN ANGLAIS listmas...@lists.debian.org Archive: https://lists.debian.org/lp7fh3$msd$1...@ger.gmane.org
