On Tue, Apr 02, 2002 at 07:22:14AM +0900, Dan Kogai wrote:
> - $str .= $^O eq 'VMS' # In VMS quote to preserve case
> - ? qq{\n\t\$(PERL) $enc2xs -"Q" -"O" -o \$\@ -f
> $table.fnm\n\n}
> - : qq{\n\t\$(PERL) $enc2xs -Q -O -o \$\@ -f $table.fnm\n\n};
> + my $plib = $ENV{PERL_CORE} ? '-I$(PERL_LIB)' : '';
> + my $ucopts = ($^O eq 'VMS') ? '-"Q" -"O"' : '-Q -O';
> + $str .=
> + qq{\n\t\$(PERL) $plib $enc2xs $ucopts -o \$\@ -f
> $table.fnm\n\n};
It's perfectly safe to just always use quotes on command line
switches, no matter what the OS, as long as they contain just dashes
and alphanumerics.
my $plib = $ENV{PERL_CORE} ? '-I$(PERL_LIB)' : '';
$str .= qq{\n\t\$(PERL) $plib $enc2xs "-Q" "-O" -o \$\@ -f $table.fnm\n\n};
--
Michael G. Schwern <[EMAIL PROTECTED]> http://www.pobox.com/~schwern/
Perl Quality Assurance <[EMAIL PROTECTED]> Kwalitee Is Job One
Stupid am I? Stupid like a fox!
