|
|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Vladimir Podgorny 2:5020/400 16 Jun 2002 21:22:50 To : Aleksey Gubin Subject : Re: упростить -------------------------------------------------------------------------------- Aleksey Gubin <Aleksey.Gubin@p17.f58.n5054.z2.fidonet.org> wrote: > Привет All! > > Hадо сабж. Hо как? > > if (length($kod) == 1) {$kodd = $kod." "x5;} > if (length($kod) == 2) {$kodd = $kod." "x3;} > if (length($kod) == 3) {$kodd = $kod." "x1;} my $kodd = $kod . ' ' x (7 - 2 * length $kod); > > Губин Алексей > gubin@perm.ru > ... np: Ras Michael - Seventy Two Nations -- VP992-RIPE --- ifmail v.2.15dev5 * Origin: Adamant ISP news server (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.cgi.perl/12034bd768b0c.html, оценка из 5, голосов 10
|