ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Tim Tokarev                          2:5020/400     03 Jun 2000  13:08:02
 To : All
 Subject : Как упорстить?
 -------------------------------------------------------------------------------- 
 

 Дано :
 
 my $birth_date;
 ($birth_date = $fd) =~ s/(\d{4})(\d{2})(\d{2})/$3\/$2\/$1/;
 ...
 my $string = Sub_a($aa,$bb,$birth_date);
 
 хочу без содания $birth_date, сделать что-то типа того :
 
 my $string = Sub_a($aa,$bb
 ,($a = $fd) =~ s/(\d{4})(\d{2})(\d{2})/$3\/$2\/$1/ );
 
 как реализовать задуманное ?
 --- ifmail v.2.15dev5
  * Origin: Krastelecomservis, Krasnoyarsk, Russia (2:5020/400)
 
 

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

Тема:    Автор:    Дата:    Как упорстить?   Tim Tokarev   03 Jun 2000 13:08:02   Как yпоpстить?   Albert N. MICHEEV   03 Jun 2000 13:54:21   Re: Как упорстить?   Paul Kulchenko   07 Jun 2000 01:29:41