Re: [PATCH] change Perl syntax to support Perl 5.6

[Robert Schiele <rschiele@gmail.com>]

[-- Attachment #1: Type: text/plain, Size: 902 bytes --]

On Sat, Aug 30, 2008 at 10:37:15PM +0200, Jakub Narebski wrote:
>  # quote the given arguments for passing them to the shell
>  # quote_command("command", "arg 1", "arg with ' and ! characters")
>  # => "'command' 'arg 1' 'arg with '\'' and '\!' characters'"
>  # Try to avoid using this function wherever possible.
>  sub quote_command {
>  	return join(' ',
>  		    map( { my $a = $_; $a =~ s/(['!])/'\\$1'/g; "'$a'" } @_ ));
>  }

Well, I guess you know why I did not consider it worth from my side to go into
that business.  ;-)

If someone has a concrete implementation and a list of (concrete) tests I
should do I can do so.

Otherwise I just consider Perl 5.6 as unsupported since our main development
systems have Perl 5.8 or later anyway.

Robert

-- 
Robert Schiele
Dipl.-Wirtsch.informatiker	mailto:rschiele@gmail.com

"Quidquid latine dictum sit, altum sonatur."

[-- Attachment #2: Type: application/pgp-signature, Size: 194 bytes --]