Автор Тема: Первую заглавной, остальные строчными  (Прочитано 3779 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн Duke

  • Заглянувший
  • Новичок
  • *
  • Сообщений: 15
  • +0/-0
  • 0
    • Просмотр профиля
    • http://games.siberianet.ru
Выручайте, что-то я совсем запарился

исходный текст лежит в массиве @model и состоит из трёх значений (LAND, CRUISER, 100), в цикле по-одному эти словечки извлекаются

исходный текст: LANDCRUISER100
надо получить : LandCruiser100

пишу так:
foreach $key(@model){ ($key)=$key=~/\\u\\w\\L\\w+\\Е/ };

скрипт работает, но ничерта не выводит

Оффлайн Mog.

  • Фанат форума
  • Ветеран
  • *****
  • Сообщений: 828
  • +0/-0
  • 0
    • Просмотр профиля
Первую заглавной, остальные строчными
« Ответ #1 : 03 Мая 2003, 16:42:26 »
for(@model){ print if s/(\\w)(\\w+)/uc($1).lc($2)/ge}
Все болезни от нервов, только сифилис от удовольствия

Оффлайн mike

  • ProPerl\'er
  • Старожил
  • ****
  • Сообщений: 435
  • +0/-0
  • 2
    • Просмотр профиля
    • http://
Первую заглавной, остальные строчными
« Ответ #2 : 03 Мая 2003, 19:41:28 »
foreach (@model) { print ucfirst lc }
[ основной браузер когда-то был, теперь попробуй разберись =]

Оффлайн Mog.

  • Фанат форума
  • Ветеран
  • *****
  • Сообщений: 828
  • +0/-0
  • 0
    • Просмотр профиля
Первую заглавной, остальные строчными
« Ответ #3 : 03 Мая 2003, 19:48:05 »
mike круто!!!
Все болезни от нервов, только сифилис от удовольствия

Оффлайн Duke

  • Заглянувший
  • Новичок
  • *
  • Сообщений: 15
  • +0/-0
  • 0
    • Просмотр профиля
    • http://games.siberianet.ru
Первую заглавной, остальные строчными
« Ответ #4 : 04 Мая 2003, 12:30:47 »
Большое спасибо обоим.

Разница вот лишь в чем, в решении от Mog., откорректированные значения записыватся в массив @model, а в решении от mike, они не записываются (?), хотя решение очень красивое :)

Оффлайн mike

  • ProPerl\'er
  • Старожил
  • ****
  • Сообщений: 435
  • +0/-0
  • 2
    • Просмотр профиля
    • http://
Первую заглавной, остальные строчными
« Ответ #5 : 04 Мая 2003, 14:50:02 »
Цитировать
Duke:
они не записываются

Ну дык, если нужно записывать, то вместо print поставить присваивание :) Основное ведь - преобразование.

Mog.
[OFF];)[/OFF]
[ основной браузер когда-то был, теперь попробуй разберись =]

 

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