- RU.PERL ----------------------------------------------------------- RU.PERL -
Msg : #3079 [502]
От : Artem Chuprina 2:5020/400 31 марта 04, 19:46
Кому : Serge Chervjakov 31 марта 04, 23:32
Тема : Re: UPPER CASE
-------------------------------------------------------------------------------
From: Artem Chuprina
Serge Chervjakov -> Андрей Трусов @ Wed, 31 Mar 2004 08:23:36 +0000 (UTC):
АТ>> Да нет, не это. Как изменить длину строки в эхотаге ?
АТ>> Т.е. есть $st="12345"; длина 5 символов. Как сделать эту строку длиной 4
АТ>> символа ? Т.е. чтобы получилось $st="1234";
SC> если надо _не более_ 4 символов, то perldoc -f substr. Если надо
SC> именно 4 символа, то 2 ситуации - либо больше 4 символов - тогда
SC> substr, либо меньше 4 символов - тогда можно воспользоваться
SC> например sprintf("%4s",$st). Выбирай:).
Можно совместить. sprintf("%4.4s", $st);
--
Artem Chuprina
RFC2822: , FIDO: 2:5020/122.256, ICQ: 13038757
--- ifmail v.2.15dev5.3
* Origin: Leninsky 45 home network (2:5020/400)