Re: Change 33318: Shell patterns are subject to tilde expansion. So the case statement
[email protected] ("H.Merijn Brand") Fri, 15 Feb 2008 15:41:38 +0100
| Newsgroups | perl.perl5.porters,perl.perl1.porters |
|---|---|
| Message-ID | <[email protected]> |
On Fri, 15 Feb 2008 14:33:45 +0000, Nicholas Clark <[email protected]> wrote: > I believe that this fix also needs applying to Perl 1, as I found the same > error in 1.0's Configure script. > > I doubt anyone can find a Perl bug older than this one :-) > > Nicholas Clark > > ----- Forwarded message from Nicholas Clark <[email protected]> ----- > > Envelope-to: [email protected] > Delivery-date: Fri, 15 Feb 2008 14:30:32 +0000 > Delivered-To: [email protected] > From: Nicholas Clark <[email protected]> > To: "Anybody And Everybody" <[email protected]> > Subject: Change 33318: Shell patterns are subject to tilde expansion. So the case statement > Date: Fri, 15 Feb 2008 06:30:03 -0800 (PST) > > Change 33318 by nicholas@minne on 2008/02/15 14:27:55 > > Shell patterns are subject to tilde expansion. So the case statement > in the filexp script (written out by Configure) for expanding ~ and > ~/* has never worked. It's always been relying on the /bin/csh glob > for the ~* case. Few people ever noticed because one has to be > building to one's home directory on a system with no csh installed. > This is a bug from Perl 1.0's Configure! > > Affected files ... > > ... //depot/perl/Configure#683 edit > > Differences ... > > ==== //depot/perl/Configure#683 (xtext) ==== > Index: perl/Configure > --- perl/Configure#682~33049~ 2008-01-23 01:18:41.000000000 -0800 > +++ perl/Configure 2008-02-15 06:27:55.000000000 -0800 > @@ -3589,7 +3589,7 @@ > $startsh > : expand filename > case "\$1" in > - ~/*|~) > + \~/*|\~) > echo \$1 | $sed "s|~|\${HOME-\$LOGDIR}|" > ;; > ~*) ^ Not this one? > End of Patch. > > ----- End forwarded message ----- -- H.Merijn Brand Amsterdam Perl Mongers (http://amsterdam.pm.org/) using & porting perl 5.6.2, 5.8.x, 5.10.x on HP-UX 10.20, 11.00, 11.11, & 11.23, SuSE 10.1 & 10.2, AIX 5.2, and Cygwin. http://qa.perl.org http://mirrors.develooper.com/hpux/ http://www.test-smoke.org http://www.goldmark.org/jeff/stupid-disclaimers/