Discussion :

[v1nux]

Bonjour,
J'ai commencer le perl , il y a trois semaines dans le but , de faire mes propre scripts, mon projet est simple, je veux dans un script perl ceci:
-ouverture simple dans dossier via gedit.
debut de script basic--->je creer une variable scalaire avec le chemin de mon dossier a ouvrir , puis la je coince je ne sais pas rediriger pour l'instant tout cela via gedit.
------------------------------------------------------------------------
#!/usr/bin/perl
use strict;
use warnings;
opendir (DIR,"/home/v1nux") or die"ne peut ouvrir v1nux\n";
close DIR;
-----------------------------------------------------------------------
pour l'instant je veux juste faire ca, je lis beaucoup de doc mais j'en suis au scalaire , hachage , et au role des modules perl.
Apres en second lieu un programme qui m'appelerais des .deb (debian) via apt-get et de remplacer certains fichiers (comme le fichier /etc/apt/sources.list) , par des fichiers modifiés, qui eux serais dans un dossier avec le script proprement dit.
Deja est ce que c'est possible.......

[Vespasien]

Deja est ce que c'est possible....

Effectivement, c'est possible en Perl. system() et exec() seront tes amis.

Butines directement vers le chapitre sur la communication avec le système afin de faire avancer ton script. Ce sera plus encourageant. Les petites nuances des premiers chapitres te seront vite rappelées: une demi-heure de prise de tête enseigne plus qu'une heure de lecture studieuse. Enfin, çà dépend aussi des tempéraments.

[v1nux]

bien , je vais me pencher de suite , enattendant je vous remercie.

[v1nux]

voila quelque test

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
#!/usr/bin/perl 
use strict;
use warnings;
my $vince="/home/vince/Desktop/test.pl";
my $sources="/home/vince/Desktop/test.pl";
#my $sources="etc/apt/sources.list";
my $apt="etc/apt/";
system "rm -rf $sources";
#system "cp -a /home/vince/Desktop/maj/sources.list $apt";
#system "/usr/bin/gedit $vince";
exit;

Vraiment un code de noob mais bon pour l'instant , je peux effacer des fichiers d'utilisateur mais pas le sources list de /etc/apt/.
Je cojite egalement et toujours sur la copie dans un fichier local avec lien relatif ( le fichier a copier ou est le script) vers un lien absolu -----> /etc/apt/sources.list

[Jedai]

Vraiment un code de noob mais bon pour l'instant , je peux effacer des fichiers d'utilisateur mais pas le sources list de /etc/apt/.

Je te rappelle que pour effacer un fichier il faut avoir les droits dessus... /etc/apt/sources.list appartient au root, il faut donc que tu lances ton script Perl avec un sudo (ou que tu fasses un sudo dans ton programme).

Par ailleurs, mets ton code entre balises CODE (bouton # de l'interface du forum), il sera bien plus lisible.

--
Jedaï

[v1nux]

ok dsl en plus j'avais oublier le / de etc/apt/sources.list c'est sur que la....