Perl

Probleme d'execution de la commande Unix echo via le perl

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : Probleme d'execution de la commande Unix echo via le perl

samuelp

Bonjour,

j'ai un probleme avec la commande echo du perl

Code :

sub mafonction()
{
use Shell qw(echo);
$test=echo("Message",'>',"/fichier" );
}

En lançant la commande echo via le Perl je n'arrive point à ecrite Message dans le fichier
Pourtant $test me renvoie bien echo "Message" > fichier

Quelqu'un aurait une idée ?

Publicité

anapajari

s/travail/glanding on hfr/gs;

t'aurrais pas oublié de printer $test des fois ???
par ailleurs tu feras gaffe que ton fichier est envoyé sur "/" comme chemin!

samuelp

anapajari a écrit :

t'aurrais pas oublié de printer $test des fois ???
par ailleurs tu feras gaffe que ton fichier est envoyé sur "/" comme chemin!

j'ai fais un print $test, sans succes

matafan

Tu as les droits d'écriture sur ton fichier ? Sinon le pod parle d'un bug qui laissait les simple quote dans la commande exécutée.

samuelp

matafan a écrit :

Tu as les droits d'écriture sur ton fichier ? Sinon le pod parle d'un bug qui laissait les simple quote dans la commande exécutée.

Euh, oui j'ai les droits d'ecriture.
J'arrive toujours pas à remplir ce fichier

anapajari

s/travail/glanding on hfr/gs;

bin ecoute j'ai pris ton script tel quel copié collé et ça marche ...
par contre contre ça envoie le fichier dans '/'.
Tu es sur des droits en écriture?

Aricoh

gentil mais fo po pousser

Essaie ceci pour voir :

Code :

sub mafonction
{
eval { `echo Message >/fichier`; };
if ($@)
{
print "Pb retour de eval : $@";
}
}

Edit : ce sont des anti-quotes qui entourent la commande echo (touche 7 du pavé alphanumérique)

Message édité par Aricoh le 30-03-2004 à 10:51:02

---------------
Samsung Galaxy S1 -> Samsung Galaxy S2 -> Samsung Note 2 -> Huawei Ascend Mate 7 -> ZTE Axon 7 -> OnePlus 6T -> Oppo Find X2 PRO

anapajari

s/travail/glanding on hfr/gs;

si on a le droit de faire autrement, perso j'ai tendance à préferer:

Code :

my $cmd="echo Message > /fichier";
system($cmd);

mais comme d'hab TMTOWTDI...

burgergold

5$? va chez l'diable!

pourquoi ne pas simplement ouvrir le fichier en ensuite faire des

Code :

print FSOR "montexte";

ou alors

Code :

`echo "toto" > monfichier`;

---------------
http://www.boincstats.com/signature/user_664861.gif

samuelp

anapajari a écrit :

si on a le droit de faire autrement, perso j'ai tendance à préferer:

Code :

my $cmd="echo Message > /fichier";
system($cmd);

mais comme d'hab TMTOWTDI...

Bien vu, mais il peut se poser un probleme :
si j'execute une commande shell par systeme et que la commande shell se plante (ou se bloque) mon programme perl se bloque lui aussi
Mais bon, c'est mieux que rien

Publicité

drigaudiere

Perl or die;

samuelp a écrit :

Bonjour,

En lançant la commande echo via le Perl je n'arrive point à ecrite Message dans le fichier
Pourtant $test me renvoie bien echo "Message" > fichier

Quelqu'un aurait une idée ?

Je te déconseille de mettre des donnés dans un fichier de cette
façon, tu lances un process à chaque fois ce qui est lourd.

Je te propose la solution suivante :

Code :

my $file = '/foo/bar/my_file';
my $message = "Hello world\n";
open FILE, ">$file" or die "Unable to open $file : $!";
print FILE $message;
close FILE;

Si tu veux ajouter des données au fichier et ne pas
réécraser le fichier à chaque fois utilise >> à la place de
> dans le open

David "Sniper" Rigaudiere
Les mongueurs de Perl - http://www.mongueurs.net
Les journées Perl 2004 - http://conferences.mongueurs.net/2004

Message édité par drigaudiere le 01-04-2004 à 15:37:45

FORUM HardWare.fr

Programmation

Perl

Probleme d'execution de la commande Unix echo via le perl

Sujets relatifs
probleme de passage de fonction en parametres	Problème de lib PNG (PHP 4.3.3)
[PHP] convertir date fr type 27/02/2001 en timestamp unix correct	Problème de positionnement [maj : solutions à deux problèmes]
[PHP] Probleme avec les sessions	Problème de ClassLoader
Petit probleme de div :/	probleme de tableau et de font
probleme avec pointeur sur objet	[C] Problème pour obtenir l'@ IP
Plus de sujets relatifs à : Probleme d'execution de la commande Unix echo via le perl

Page générée en 0.051 secondes