The only difference is that the arrays are 0-based; you'd do $mesiac[0] for January instead of $mesiac{1}.@mesiac = qw(Január Február Marec Apríl Máj Jún Júl August September O +któber November December);
$"=$,,$_=q>|\p4<6 8p<M/_|<('=> .q>.<4-KI<l|2$<6%s!<qn#F<>;$, .=pack'N*',"@{[unpack'C*',$_] }"for split/</;$_=$,,y[A-Z a-z] {}cd;print lc
In reply to Re: Slovak language characters
by Stevie-O
in thread Slovak language characters
by Wampa
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |