Gentoo Archives: gentoo-perl

From: antoine.raillon@××××.com
To: gentoo-perl@l.g.o
Subject: Réf. : Re: [gentoo-perl]
Date: Thu, 12 May 2005 12:18:27
In Reply to: Re: [gentoo-perl] by Michael Cummings
Speaking of perlstyle, perltidy now gives quite an ugly output, especially
on the massive ternary operators list.
Should we/I continue to use it ? :p
If no, is there style rules to follow ?

             Michael Cummings                                              
   >                                                   Pour 
             12/05/2005 14:11                                           cc 
                 Veuillez              Re: [gentoo-perl]         
                répondre à                                                 

On Wednesday 11 May 2005 09:56 pm, David (Sniper) Rigaudiere wrote:
> - get rid of \t, and use of 4 spaces as perlstyle :)
> - get rid of system(mv ...) use File::Copy::move()
> > # FIXME Sniper > # the defined() seems mistakes, we want the defined status or ENV values
Ah, but when you run this code and the env var isn't defined - you get a broken script that dies on an undeclared var (a la strict and warnings). I added the defines to keep it from choking for those of us that don't have ENV{TMPDIR,ftp_proxy,http_proxy} set. These are the vars portage and cpan use if defined - but if not defined, they don't care - but when trying to set values (and under use strict) we need someway of dealing with them not even existing (vs undef). One of those undef != non-exist - because undef is a value in itself, and in this case the values simply don't exist to test.
> ??? my $tmp_dir = -d $ENV{TMPDIR} ? defined($ENV{TMPDIR})
> $ENV{HOME}; > my $ftp_proxy = $ENV{ftp_proxy} ? defined($ENV{ftp_proxy}) :
> my $http_proxy = $ENV{http_proxy} ? defined($ENV{http_proxy}) :
> my $user_shell = -x $ENV{SHELL} ? defined($ENV{SHELL}) : > DEF_BASH_PROG; > > > > > David "Sniper" Rigaudiere > GPG KeyID 0xFF1E982D
-- -----o()o--------------------------------------------- Michael Cummings | #gentoo-dev, #gentoo-perl Gentoo Perl Dev | on -----o()o--------------------------------------------- [rattachement "attl9ue0.dat" supprimé par ANTOINE RAILLON - E233469/users/PSA] -- gentoo-perl@g.o mailing list