ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Vladimir Podgorny 2:5020/400 05 Feb 2002 11:17:52
To : Valery Kondakoff
Subject : Re: Сравнение дат?
--------------------------------------------------------------------------------
Valery Kondakoff <Valery.Kondakoff@f163.n5020.z2.fidonet.org> wrote:
> А (кстати) я попробовал сравнивать строки вида DD MMM YY и во всех тестах тоже
> получил корректные результаты, например:
>
> $date1 = "03 Feb 00";
> $date2 = "05 Jun 99";
> print ($date1 cmp $date2);
#!/usr/bin/perl -wT
use strict;
use warnings;
my @date=(
'01 Jun 00',
'01 Jul 00'
);
print(($date[0] cmp $date[1] ? 'Jun' : 'Jul'),"\n");
Гы?
--
VP992-RIPE
--- ifmail v.2.15dev5
* Origin: Adamant ISP news server (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
