Добро пожаловать,
Гость
. Пожалуйста,
войдите
или
зарегистрируйтесь
.
Не получили
письмо с кодом активации
?
1 час
1 день
1 неделя
1 месяц
Навсегда
Новости:
Начало
Помощь
Поиск
Календарь
Вход
Регистрация
Forum Webscript.Ru
»
Программирование
»
Perl
»
аналог функции в perl
« предыдущая тема
следующая тема »
Печать
Страницы: [
1
]
Вниз
Автор
Тема: аналог функции в perl (Прочитано 5099 раз)
0 Пользователей и 1 Гость просматривают эту тему.
micolo
Заглянувший
Новичок
Сообщений: 16
+0/-0
0
аналог функции в perl
«
:
27 Декабря 2006, 17:12:34 »
Доброго времени суток!
У меня такой вопрос.
Есть в php функция explode, которую я использую следующим образом:
$a
=
explode
(
"|"
,
$word
);
for (
$i
=
0
;
$i
<
count
(
$a
);
$i
++)
{
.....
}
Есть ли в perl подобная функция и как будет выглядеть её вариант, в процедуре которая указывается в приведённом мною коде?
Записан
NeoNox
Координатор
Глобальный модератор
Ветеран
Сообщений: 3012
+0/-0
0
аналог функции в perl
«
Ответ #1 :
27 Декабря 2006, 17:57:56 »
@a = split \'|\', $word;
for (@a)
{
...
}
Записан
The documentations is your friend
xames
Завсегдатай
Пользователь
Сообщений: 62
+0/-0
0
аналог функции в perl
«
Ответ #2 :
27 Декабря 2006, 20:36:47 »
@a = split \'
\\
|\', $word;
экранировать \'|\' надо)).
split /PATTERN/,EXPR,LIMIT
первый параметр воспринимается как шаблон, а в шаблонах "|" является спец символом. Без экранирования ожидаемого результата не добиться =)
Записан
micolo
Заглянувший
Новичок
Сообщений: 16
+0/-0
0
аналог функции в perl
«
Ответ #3 :
27 Декабря 2006, 22:21:12 »
а как обратится к элементу массива внутри
for (@
a
)
{
...
}
получившегося в результате split
Записан
DartSidius
Фанат форума
Старожил
Сообщений: 309
+0/-0
0
аналог функции в perl
«
Ответ #4 :
28 Декабря 2006, 08:31:04 »
1. вариант
my
@
a
=
split
(/\\|/,
$word
);
for (
$i
=
0
;
$i
<$
#a;$i++) {
print
$a
[
$i
];
}
2. вариант
foreach(
split
(/\\|/,
$word
)) {
print
$_
;
}
«
Последнее редактирование: 28 Декабря 2006, 14:03:17 от DartSidius
»
Записан
arto
>
Ветеран
Сообщений: 699
+0/-0
2
аналог функции в perl
«
Ответ #5 :
28 Декабря 2006, 13:13:42 »
foreach (split ...) {
s#a#b#g;
print;
}
Записан
micolo
Заглянувший
Новичок
Сообщений: 16
+0/-0
0
аналог функции в perl
«
Ответ #6 :
28 Декабря 2006, 14:13:39 »
спасибо!
Записан
Печать
Страницы: [
1
]
Вверх
« предыдущая тема
следующая тема »
Forum Webscript.Ru
»
Программирование
»
Perl
»
аналог функции в perl
Sitemap
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28