Want comma in printed numbers not dot. How?

[moller]

I thought this wold be simple, but after fooling
around with POSIX and locale I cant get it to
work.

LC_NUMERIC stays C no matter what I try.

Using Activestate perl on WIN-XP Swedish version.
I would apreciate any pointers so that I can
get rid of the
$n =~ y/\./,/;
Im using as a fix now.


I have read perldoc perllocale but no luck
with those examples either.


/moller

 

[Peter Scott]

I thought this wold be simple, but after fooling
around with POSIX and locale I cant get it to
work.

LC_NUMERIC stays C no matter what I try.

Using Activestate perl on WIN-XP Swedish version.

Locale names on Windows are different. This works:

C:\Documents and Settings\peter>perl -MPOSIX=locale_h -Mlocale -le \
"setlocale(LC_NUMERIC, 'French'); print 22/7"
3,14285714285714

where on Unix it would be "fr_FR" instead of "French".

Tested with ActivePerl 5.8.2 on XP.

 

[Peter J. Acklam]

This works:

C:\Documents and Settings\peter>perl -MPOSIX=locale_h -Mlocale -le \
"setlocale(LC_NUMERIC, 'French'); print 22/7"
3,14285714285714

where on Unix it would be "fr_FR" instead of "French".

Neither of them seem to work on Cygwin, though...

$ perl -MPOSIX=locale_h -Mlocale -le \
"setlocale(LC_NUMERIC, 'French'); print 22/7"
3.14285714285714

$ perl -MPOSIX=locale_h -Mlocale -le \
"setlocale(LC_NUMERIC, 'fr_FR'); print 22/7"
3.14285714285714

[This is perl, v5.8.2 built for cygwin-thread-multi-64int]

Peter