File: epoutf8inc.htm

package info (click to toggle)
libembperl-perl 2.5.0-17
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, sid
  • size: 7,632 kB
  • sloc: ansic: 21,387; perl: 14,497; javascript: 4,280; cpp: 467; xml: 49; makefile: 35; sh: 24
file content (18 lines) | stat: -rw-r--r-- 559 bytes parent folder | download | duplicates (6) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 

[!  $i = 'Это русский текст в переменной'; $leni = length($i); !] 

<html>
<head>
<title>Проверка руссого</title>
</head>
<body>

TEST ([+$Embperl::VERSION+])
i: Проверка вывода переменной: [+$i+] ([+$leni+]) 
1: [-  $a = 'Это русский текст в переменной'; $len = length($a); -] 
2: Проверка вывода переменной: [+$a+] ([+$len+]) 
3: $param[0] in epout8inc = [+ $param[0] +] 
4: $param[1] in epout8inc = [+ $param[1] +] 
</body> 
</html>