Fórum Ubuntu CZ/SK

Ubuntu pro osobní počítače => Software => Příkazový řádek a programování pro GNU/Linux => Téma založeno: Rotty 09 Března 2012, 12:04:37

Název: perl a locale
Přispěvatel: Rotty 09 Března 2012, 12:04:37

zdravim, potreboval bych rozdelit text na slova. pouzivam tento kod:

Kód: [Vybrat]

#!/usr/bin/perl
use strict;
use locale;

my $text="žluťoučký kůň";
printf ($text);
my @slova=split(/\W+/,$text);
foreach (@slova)
{
printf("$_\n");
}
a vysledkem je:

Kód: [Vybrat]

žluťoučký kůň
lu
ou
k
k
predpokladam ze mam spatne nastaveny locale, protoze ve widlich mam vyzkouseny ze kod funguje.
poradte nekdo jak na ne

Název: Re:perl a locale
Přispěvatel: Pirkil 12 Března 2012, 17:03:47

Pro zacatek bych zkusil neco jako:

Kód: [Vybrat]

use utf8;


Název: Re:perl a locale
Přispěvatel: ntz_reloaded 12 Března 2012, 20:13:15

proc ten podivuhodny printf ? o.O