Hello there

They offer some of the best premium newsgroup access anywhere.
You can find almost anything you are looking for.
They give you access to some of the best groups others may not carry.
With some of the fastest connections around it's no wonder people love it and keep coming back.
Great prices and support await you as you travel into the beautiful world of premium nntp access.
Images, video, mp3 music, the real news from around the world... it's all inside waiting for you.
One thing I love about them, they don't keep log files of the news I read or files I download.
Take a look at all the great features below and imagine! You'll LOVE it.
Take a look, I know you'll love it as much as I do.

Streaming audio and video
2,000,000 new posts each day
Posting allowed!
Very long retention
Keyword searchable

Try out http://www.newsdude.net today!

Puk ...

Bonjour,

Je souhaite écrire un Bundle privé (non distribué sur le CPAN) pour
installer automatiqment les dépendances d'un script Perl.

J'ai donc créé un répertoire Bundle, contenant francktest.pm. Ce Bundle
est de la forme suivante :

package Bundle::francktest;

$VERSION = '1.00';

1;

__END__

=head1 NAME

Blabla

=head1 SYNOPSIS

Blabla

=head1 CONTENTS

À (at) Thu, 29 Mar 2007 19:20:25 +0200,
kurtz le pirate écrivait (wrote):

Dans la documentation... Mais, pour être honnête, sur ce coup, '-inf'
et '+inf' ne sont évoqués que dans 'perltoc' dans une section
consacrée à Math::BigInt(!). J'ai donc effectué ensuite quelques
tests :

%% perl -e '$a=exp(1e300); print $a,"\n"'
inf
%% perl -e '$a=-inf; print "inf\n" if $a < -1e300;'
inf
%%

Et voilà...

In article ,
Paul Gaborit wrote:

ben oui ! exactement ce que je cherchais.
mais ou trouvez vous ces infos ?

merci

kurtz le pirate wrote:

In article <460966ab$0$25922$ba4acef3@news.orange.fr>,
Mark Clements wrote:

pourtant, mon script commence par :

#!/usr/bin/perl -w
use strict;

le <-w> est équivalent au use warning non ? :))

In article somewhere.net>,
Jean-Baptiste Mazon wrote:

In article ,
Paul Gaborit wrote:

juste pour définir l'infini. j'ai écrit :

use constant PLUS_INFINI => +999999.0;
use constant MOINS_INFINI => -999999.0;

mais peut être un jour, des données seront supérieures à ces
définitions, et mon script ne marchera plus. si perl définit un
BIGNUMBER, c'est à dire le plus(ou moins) grans nombre qu'il sait gérer,
ce problème ne peut apparaître.

Bonjour et merci beaucoup pour la réponse,

Non seulement elle me satisfait mais je vois aussi de la même
manière :

comment visualiser le fichier courant dans une boucle <>
my $fic = $file[-$#ARGV - 2];

comment comptabiliser le nombre de remplacements directement dans un
scalaire :
$nbr_rempl = s/ligne/LIGNE/g + 0

Merci triplement donc :-) et bonne soirée,

C. Tobini

À (at) 27 Mar 2007 15:08:09 GMT,
Nicolas George salle-s.org> écrivait (wrote):

Certes... Mais si on détecte la fin de fichier, le close ne sert qu'à
libérer de la ressource système (le processus à l'autre bout à
lui-même fermer le canal et on a déjà tout lu).

Ok.