rss
Rechercher : dans
Par : Pertinence Date Nom d'utilisateur
Statut : Non résolu

Script Perl / Shell / Sauvegarde

Posté par Denver, le mercredi 7 novembre 2007 à 16:38:54
Bonjour,

Je souhaite faire un programme en Perl qui devrait etre simple.
Mais sur un simple "ls -l nomdefichier" le programme me ressort : "abandon"

Ma question : Pourquoi ?

Deuxième chose, quelqu'un aurait-il une solution simple à cette problématique qui a la base est :

Vérification de la bonne execution de la sauvegarde sur bande.
En fait j'ai 2 dump de bases (ldap + mysql). Donc 2 fichiers .gz mis sur bande.
Il faut donc comparer la date du jour à la date des fichiers qui sont sur la bande avant sont ejection du lecteur.

Le script de sauvegarde est un shell, mais j'peux très bien faire appel à un fichier perl avant la fin du fichier sh.

Merci d'avance.

Denver.
Répondre à Denver  Signaler ce message aux modérateurs Aller au dernier message

1


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
oeuf hop là, le mercredi 7 novembre 2007 à 18:20:45
Mais sur un simple "ls -l nomdefichier" le programme me ressort : "abandon"

Ma question : Pourquoi ?



erf si on voyait le code ça serait plus facile :)

Kes ki fo faire kan on a détruit Alfred
Répondre à oeuf hop là

2


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
Denver, le jeudi 8 novembre 2007 à 10:18:33
Simple erreur de débutant :

Sans le #!/usr/bin/perl
EN PREMIERE LIGNE, le programme ne fonctionne pas.

Et tout simplement, pour executer une commande en Perl :

my $commande = "ls -l nomdefichier'";
my $resultat = system($commande);



System permet d'executer une commande Shell dans un script Perl.
Plus précisement, une commande du système source.
A la base, je suis en Shell, je lance un Perl, qui execute lui même un Shell.

La commande Exec permet la même chose, mais ne revient pas au système d'origine.

J'éspère avoir été clair tout de même ... ;-)
Répondre à Denver

3


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
 lami20j, le jeudi 8 novembre 2007 à 18:48:03
Salut,

tu as un apostrophe simple à la fin de nomfichier

sinon ça doit fonctionner.

regarde
lami20j@debian:~/trash$ ls -l aa
-rw-r--r-- 1 lami20j lami20j 3104 2007-10-30 23:29 aa
lami20j@debian:~/trash$ cat ccm.pl
#!/usr/bin/perl


my $commande = "ls -l aa";
my $resultat = system($commande);
lami20j@debian:~/trash$ perl ccm.pl
-rw-r--r-- 1 lami20j lami20j 3104 2007-10-30 23:29 aa

lami20j
Répondre à lami20j
Logiciels pertinents trouvés dans les téléchargements
Télécharger SSH Secure Shell 3.0 build 203SSH Secure Shell - SSH secure shell for workstations est un client SSH flexible permettant de se connecter de façon sécurisée à des...Catégorie: Telnet/SSH
Licence: Open Source
Télécharger All In One Video Script 1.0All In One Video Script - All In One Video Script est un script pour l'extension GreaseMonkey pour le navigateur Firefox permettant de détecter la...Catégorie: Vidéo
Licence: Freeware/gratuit
Télécharger Crimson Editor 3.70Crimson Editor - Crimson Editor est un éditeur professionnel de code source pour Windows. Ce programme, très léger en terme de taille,...Catégorie: Webmaster
Licence: Freeware/gratuit
Télécharger ShellEnhancer  3.0.0.91ShellEnhancer - ShellEnchancer est un programme d'amélioration des fonctions de base de Windows. Il rend les interfaces plus stables et plus...Catégorie: Personnalisation
Licence: Freeware/gratuit
Plus de logiciels gratuits sur « Script Perl / Shell / Sauvegarde »