|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Konstantin Tokar 2:5020/400 28 Dec 2004 06:35:37 To : Nikolay Pichtin Subject : Re: Работа с архивом --------------------------------------------------------------------------------
Nikolay Pichtin wrote:
А это точно работает? Так здорово закручено...
...
> my $fh = CRCComputingFileHandle->new();
> foreach my $member ($zip->members()) {
> $Files{$member->fileName()} = $member->compressedSize() if
> $Files{$member->$member->compressedSize();
> }
...
--- ifmail v.2.15dev5.3
* Origin: Demos online service (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/6577baea79e7.html, оценка из 5, голосов 10
|