ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Artem Chuprina                       2:5020/400     28 Nov 2002  14:53:21
 To : Victor Lazarchuk
 Subject : Re: сpавнение дат
 -------------------------------------------------------------------------------- 
 

 Здравствуй, Victor Lazarchuk.
 
 VL>    Есть две даты (mm.dd.yy) : 45.10.20 и 01.67.29 .
 VL>    Как опpеделить находится ли тpетья дата 20.39.27 междy пеpвыми двyмя ?
 
 "45.10.20" =~ /^(\d\d)\.(\d\d)\.(\d\d)$/;
 my $da = $3.$2.$1;
 "01.67.29" =~ /^(\d\d)\.(\d\d)\.(\d\d)$/;
 my $db = $3.$2.$1;
 "20.39.27" =~ /^(\d\d)\.(\d\d)\.(\d\d)$/;
 my $dc = $3.$2.$1;
 if ($da lt $dc && $dc lt $db)
 
 Можно в одну строчку, но я для внятности.
 
 -- 
 Artem Chuprina
 Communiware.net
 RFC2822: <ran@ran.pp.ru>, FIDO: 2:5020/122.256, ICQ: 13038757
 --- ifmail v.2.15dev5
  * Origin: Leninsky 45 home network (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    сpавнение дат   Victor Lazarchuk   27 Nov 2002 18:29:19   Re: сpавнение дат   Vladimir Podgorny   28 Nov 2002 00:26:46   сpавнение дат   Serguei Trouchelle   28 Nov 2002 11:25:47   Re: сpавнение дат   Andrey N. Demushkin   28 Nov 2002 13:46:41   Re: сpавнение дат   Artem Chuprina   28 Nov 2002 14:53:21