[perl] de @ vers $

Fermé

fxtaa Messages postés 1050 Date d'inscription mardi 20 octobre 2009 Statut Membre Dernière intervention 2 avril 2015 - 7 déc. 2009 à 10:36
lami20j - 15 déc. 2009 à 21:07

Bonjour,
Je souhaiterai savoir si l'un d entre vous ne connaitrait pas une petite astuce pour passer l'intégralité d'une variable @ dans un $ sans passer par un fichier texte ?

En gros ne pas faire ca (je trouve pas super ca optimisé ^^) :

open (FILE, ">c:\\find\\bob.txt");
print FILE @find;
close FILE;

open (FILE, "c:\\find\\bob.txt");
$bob = <FILE>;
close FILE;

$bob =~ s/c:/\n/g;

Bonne journée.

A voir également:

[perl] de @ vers $
Windows 7 vers windows 10 - Guide
Transferer photo android vers pc - Guide
Qwerty vers azerty - Guide
Vers quelle adresse web renvoie ce lien - Guide
Votre envoi est réacheminé vers son site de distribution - Forum Consommation & Internet

1 réponse

Réponse 1 / 1

lami20j
15 déc. 2009 à 21:07

Salut,

Utilise la fonction join par exemple.

lami20j@debian:~$ cat tab2scalar.pl
#!/usr/bin/perl
use strict;use warnings;

my @find=('a'..'z');
print "********** Le tableau \@find **********\n";
print "@find\n";
my $var = join " ",@find;
print "********** La variable \$var **********\n";
print "$var\n";

__END__

lami20j@debian:~$ perl tab2scalar.pl
********** Le tableau @find **********
a b c d e f g h i j k l m n o p q r s t u v w x y z
********** La variable $var **********
a b c d e f g h i j k l m n o p q r s t u v w x y z
lami20j@debian:~$

Discussions similaires

Colis en cours de transport vers votre site de livraison ?

exo pix

il est en cours de transport vers votre site de livraison

Que signifie ''Votre colis est arrivé sur son site de distribution'' ?

'Votre colis est dans le site de livraison qui dessert votre adresse' que faire

Discussions similaires

Newsletters