Показать сообщение отдельно

  #322  
Старый 23.02.2008, 01:07
bul.666
Banned
Регистрация: 06.06.2006
Сообщений: 944
Провел на форуме:
3986705

Репутация: 1403


Отправить сообщение для bul.666 с помощью ICQ
По умолчанию

Типо того?
PHP код:
#!/usr/bin/perl 
@array = ('apple','asdas','123123d','sda2122d12','sad12d12e','tomato','orange'); #Создаем массив
$size = @array; #Получаем размер массива
$str 'tomato'#Строку по которой ищем индекс
for ($i=0;$i<$size;$i++) {
    if (
$str eq $array[$i]) {
        print 
"Index of $str : ".$i;
    }

 
Ответить с цитированием