Программирование > Perl

Как наиболее быстро удалить 1-й символ в строке?

(1/1)

Bum:
Последний понятно - chop,
а первый ?

lodevar:
А substr не подходит?

:

--- Цитировать ---а первый ?
--- Конец цитаты ---

s/^.{1}//;

:)

:
А это для любителей острых ощущений :)))

$str = join "", (split //, $str)[1 .. (length $str) - 1];

P.S. применять не рекомендуется :))

Навигация

[0] Главная страница сообщений