ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Eugene Grosbein                      2:5006/1       04 Oct 2002  12:25:29
 To : Anton Ryzhkov
 Subject : Re: <none>
 -------------------------------------------------------------------------------- 
 

 
  AR> Hе подскажете, как изобразить на перле подобную команду:
  AR> copy test*.txt test.txt
 
 Шаблон:
 
   if(opendir(D,$dir)) {
     while(defined($next=readdir(D))) {
       next unless $next=~/test.*\.alt$/;
       my_own_copy($next,'test.txt');
     }
     closedir(D);
   }
 
 Eugene
 -- 
 "Люди забыли эту истину," - сказал Лис, - "но ты не забывай"
 --- slrn/0.9.7.4 (FreeBSD)
  * Origin: Svyaz Service JSC (2:5006/1@fidonet)
 
 

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

Тема:    Автор:    Дата:    <без заголовка>   Anton Ryzhkov   03 Oct 2002 21:24:28   Re: <none>   Eugene Grosbein   04 Oct 2002 12:25:29   <без заголовка>   Dmitry Suhodoev   04 Oct 2002 10:54:07   <none>   Alexander Lunkov   04 Oct 2002 17:53:40   <none>   Bulat Ziganshin   05 Oct 2002 11:17:52