* [sisyphus] Q: PerlIO::via::gzip
@ 2004-04-21 1:46 Alexey Tourbin
2004-04-22 4:13 ` iLya Bryzgalow
0 siblings, 1 reply; 6+ messages in thread
From: Alexey Tourbin @ 2004-04-21 1:46 UTC (permalink / raw)
To: Sisyphus
[-- Attachment #1: Type: text/plain, Size: 485 bytes --]
Здравствуйте.
А в перле кто-нибудь разбирается? Нарисовал тут.
Смотрю на это и думаю: ы?
package PerlIO::via::gzip;
use Compress::Zlib qw(gzopen);
use strict;
sub PUSHED {
my $class = shift;
bless \my $self, $class;
}
sub FILL {
my ($self, $fh) = @_;
$$self ||= gzopen($fh, "r");
my $n = $$self->gzreadline(my $line);
$n > 0 ? $line : undef;
}
sub WRITE {
my ($self, $buf, $fh) = @_;
$$self ||= gzopen($fh, "w");
$$self->gzwrite($buf);
}
1;
[-- Attachment #2: Type: application/pgp-signature, Size: 189 bytes --]
^ permalink raw reply [flat|nested] 6+ messages in thread
* Re: [sisyphus] Q: PerlIO::via::gzip
2004-04-21 1:46 [sisyphus] Q: PerlIO::via::gzip Alexey Tourbin
@ 2004-04-22 4:13 ` iLya Bryzgalow
2004-04-22 5:57 ` Alex Ott
2004-04-24 6:19 ` Alexey Tourbin
0 siblings, 2 replies; 6+ messages in thread
From: iLya Bryzgalow @ 2004-04-22 4:13 UTC (permalink / raw)
To: ALT Linux Sisyphus discussion list
Wed, 21 Apr 2004 05:46:51 +0400 Alexey Tourbin <at@altlinux.ru> сообщил:
>
> Здравствуйте.
> А в перле кто-нибудь разбирается? Нарисовал тут.
> Смотрю на это и думаю: ы?
>
> package PerlIO::via::gzip;
>
> use Compress::Zlib qw(gzopen);
> use strict;
>
> sub PUSHED {
> my $class = shift;
> bless \my $self, $class;
> }
>
> sub FILL {
> my ($self, $fh) = @_;
> $$self ||= gzopen($fh, "r");
> my $n = $$self->gzreadline(my $line);
> $n > 0 ? $line : undef;
> }
>
> sub WRITE {
> my ($self, $buf, $fh) = @_;
> $$self ||= gzopen($fh, "w");
> $$self->gzwrite($buf);
> }
>
> 1;
>
Оффтопик смею заметить.
Мне бы тоже было интересно разобраться с разными вещами, но Сизиф уже
постепенно превращается в паралель Коммунити.
Меня самого иногда поправляли, так давайте вместе пойдем... в Коммунити.
--
_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/ _/ _/ _/
_/ iLya Bryzgalow aka iLL _/ _/ _/
_/ Linux-Astronomy-Krasnodar-Russia _/ _/ _/ _/
_/ LinuxUser 301257 _/ _/ _/ _/
_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/ _/ _/_/_/ _/_/_/
i don't smoke, so wish to you!
http://www.krumn.oilnet.ru/
ftp://ftp.krumn.oilnet.ru/
JID://ill@jabber.org
e-mail://ill@krumn.oilnet.ru
kernel-2.6.5-std26-up-alt1 ALT Linux Sisyphus (20040420)
^ permalink raw reply [flat|nested] 6+ messages in thread
* Re: [sisyphus] Q: PerlIO::via::gzip
2004-04-22 4:13 ` iLya Bryzgalow
@ 2004-04-22 5:57 ` Alex Ott
2004-04-24 6:17 ` [sisyphus] " Alexey Tourbin
2004-04-24 6:19 ` Alexey Tourbin
1 sibling, 1 reply; 6+ messages in thread
From: Alex Ott @ 2004-04-22 5:57 UTC (permalink / raw)
To: sisyphus
Re all
>Wed, 21 Apr 2004 05:46:51 +0400 Alexey Tourbin <at@altlinux.ru> >> Здравствуйте.
>> А в перле кто-нибудь разбирается? Нарисовал тут.
>> Смотрю на это и думаю: ы?
>>
>> package PerlIO::via::gzip;
Вопрос неправильно сформулирован -- правильный вопрос -- "зачем изобретать велосипед, когда есть PerlIO::gzip и Tie::Gzip?" ;-)
^ permalink raw reply [flat|nested] 6+ messages in thread
* [sisyphus] Re: Q: PerlIO::via::gzip
2004-04-22 5:57 ` Alex Ott
@ 2004-04-24 6:17 ` Alexey Tourbin
0 siblings, 0 replies; 6+ messages in thread
From: Alexey Tourbin @ 2004-04-24 6:17 UTC (permalink / raw)
To: sisyphus
[-- Attachment #1: Type: text/plain, Size: 1291 bytes --]
On Thu, Apr 22, 2004 at 09:57:09AM +0400, Alex Ott wrote:
> >> А в перле кто-нибудь разбирается? Нарисовал тут.
> >> Смотрю на это и думаю: ы?
> >>
> >> package PerlIO::via::gzip;
> Вопрос неправильно сформулирован -- правильный вопрос -- "зачем
> изобретать велосипед, когда есть PerlIO::gzip и Tie::Gzip?" ;-)
Да (более того, вопрос вообще не сформулирован, если не считать
формулировку "ы" синонимом "для тех, кто понял").
Дело в том, что PerlIO::gzip -- это бинарная привязка к zlib
(частный случай), а Tie::Gzip -- это та же обертка над Compress::Zlib,
которая суть общий случай привязки к zlib.
Недостатки PerlIO::gzip легко отыскивается в README:
Compression and Decompression are implemented, but not together.
If you attempt to open a file for reading and writing the open
will fail.
Threads - Currenly this module isn't threadsafe as it can't clone an open layer.
flush() doesn't really flush, just empty the buffer.
Т.е. это Николас Кларк как раз и изобрел велосипед, не велосипед даже,
а так... костыль с колесом. В мандраке этот костыль с колесом
прикрутили в pp_ctl.c, см. Cooker-SPECS/perl/perl-5.8.0-use_gzip_layer.patch
Т.е. через PerlIO привязку сделать проще и веселее (stacked и т.д.).
Только почему-то никто не делает...
[-- Attachment #2: Type: application/pgp-signature, Size: 189 bytes --]
^ permalink raw reply [flat|nested] 6+ messages in thread
* [sisyphus] Re: Q: PerlIO::via::gzip
2004-04-22 4:13 ` iLya Bryzgalow
2004-04-22 5:57 ` Alex Ott
@ 2004-04-24 6:19 ` Alexey Tourbin
2004-04-24 14:25 ` [sisyphus] JT PDP5 (was: PerlIO::via::gzip) Alexey Tourbin
1 sibling, 1 reply; 6+ messages in thread
From: Alexey Tourbin @ 2004-04-24 6:19 UTC (permalink / raw)
To: ALT Linux Sisyphus discussion list
[-- Attachment #1: Type: text/plain, Size: 691 bytes --]
On Thu, Apr 22, 2004 at 08:13:02AM +0400, iLya Bryzgalow wrote:
> Оффтопик смею заметить.
> Мне бы тоже было интересно разобраться с разными вещами, но Сизиф уже
> постепенно превращается в паралель Коммунити.
> Меня самого иногда поправляли, так давайте вместе пойдем... в Коммунити.
А Perl Development Platform вам не нужна? Тогда вам в community. :)
А мне нужна. Ну я подумаю...
> --
> _/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/ _/ _/ _/
> _/ iLya Bryzgalow aka iLL _/ _/ _/
> _/ Linux-Astronomy-Krasnodar-Russia _/ _/ _/ _/
> _/ LinuxUser 301257 _/ _/ _/ _/
> _/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/ _/ _/_/_/ _/_/_/
[-- Attachment #2: Type: application/pgp-signature, Size: 189 bytes --]
^ permalink raw reply [flat|nested] 6+ messages in thread
* [sisyphus] JT PDP5 (was: PerlIO::via::gzip)
2004-04-24 6:19 ` Alexey Tourbin
@ 2004-04-24 14:25 ` Alexey Tourbin
0 siblings, 0 replies; 6+ messages in thread
From: Alexey Tourbin @ 2004-04-24 14:25 UTC (permalink / raw)
To: ALT Linux Sisyphus discussion list
[-- Attachment #1: Type: text/plain, Size: 671 bytes --]
On Sat, Apr 24, 2004 at 10:19:13AM +0400, Alexey Tourbin wrote:
> > Оффтопик смею заметить.
> > Мне бы тоже было интересно разобраться с разными вещами, но Сизиф уже
> > постепенно превращается в паралель Коммунити.
> > Меня самого иногда поправляли, так давайте вместе пойдем... в Коммунити.
>
> А Perl Development Platform вам не нужна? Тогда вам в community. :)
> А мне нужна. Ну я подумаю...
Вы хоть что-нибудь записать успели? Ну вот, пока и довольно с вас...
А в Петушках - в Петушках я обещаю поделиться с вами секретом "Иорданских
струй", если доберусь живым; если милостив Бог.
Педали нужно быстрее крутить, а не костыль с колесом изобретать.
[-- Attachment #2: Type: application/pgp-signature, Size: 189 bytes --]
^ permalink raw reply [flat|nested] 6+ messages in thread
end of thread, other threads:[~2004-04-24 14:25 UTC | newest]
Thread overview: 6+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2004-04-21 1:46 [sisyphus] Q: PerlIO::via::gzip Alexey Tourbin
2004-04-22 4:13 ` iLya Bryzgalow
2004-04-22 5:57 ` Alex Ott
2004-04-24 6:17 ` [sisyphus] " Alexey Tourbin
2004-04-24 6:19 ` Alexey Tourbin
2004-04-24 14:25 ` [sisyphus] JT PDP5 (was: PerlIO::via::gzip) Alexey Tourbin
ALT Linux Sisyphus discussions
This inbox may be cloned and mirrored by anyone:
git clone --mirror http://lore.altlinux.org/sisyphus/0 sisyphus/git/0.git
# If you have public-inbox 1.1+ installed, you may
# initialize and index your mirror using the following commands:
public-inbox-init -V2 sisyphus sisyphus/ http://lore.altlinux.org/sisyphus \
sisyphus@altlinux.ru sisyphus@altlinux.org sisyphus@lists.altlinux.org sisyphus@lists.altlinux.ru sisyphus@lists.altlinux.com sisyphus@linuxteam.iplabs.ru sisyphus@list.linux-os.ru
public-inbox-index sisyphus
Example config snippet for mirrors.
Newsgroup available over NNTP:
nntp://lore.altlinux.org/org.altlinux.lists.sisyphus
AGPL code for this site: git clone https://public-inbox.org/public-inbox.git