🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: pl.comp.lang.perl
Article #51422

Re: [PERL] analiza warunku if

#51422
From: "Stachu 'Dozzie'
Date: Tue, 26 Feb 2013 09:46
21 lines
861 bytes
On 2013-02-26, Karol Malinowski <malinkalive@gmail.com> wrote:
> Witam,
> poni�ej przedstawiam warunek if z aplikacji kt�ra analizuje zawarto��
> pliku binarnego. Uda�o mi si� przeanalizowa� wi�kszo�� skryptu jednak
> poni�y warunek  sprawia mi k�opot:

Warunek? Znaczy nie rozumiesz, kiedy si� to wykona? Czy jedynie
unpack()?

>     if ($plik and ($sector == 2 or $sector == 3) and $j == 0 and substr($block,0,1) eq "\x10") {
> my (undef,$ti,$ty,$tm,$td,$th,$tt,$vy,$vm,$vd,$vh,$vt,$vl,$vb,$vs)=unpack('A8 A8 A7 A4 A5 A5 A6 A7 A4 A5 A5 A6 A14 A6 A14 A10 A*',unpack('B*',$block));
[...]
> Zastanawiam si� w jaki spos�b dane s� sortowane i kt�re warto�ci
> binarne (pozycja w pliku) s�  wy�wietlane w poszczeg�lnych zmiennych?

A czyta�e� dokumentacj� do pack()/unpack()?

--
Secunia non olet.
Stanislaw Klekot

Message-ID: <slrnkip13j.1ta.dozzie@jarowit.net>
Path: polish.pugleaf.net!archive.newsdeef.eu!mbox2nntp-pl.comp.lang.perl.mbox.zip!g1ni43048wig.0!nntp.google.com!feeder1.cambriumusenet.nl!82.197.223.103.MISMATCH!feeder3.cambriumusenet.nl!82.197.223.108.MISMATCH!feeder2.cambriumusenet.nl!feed.tweaknews.nl!193.141.40.65.MISMATCH!npeer.de.kpn-eurorings.net!npeer-ng0.de.kpn-eurorings.net!border2.nntp.ams2.giganews.com!border1.nntp.ams2.giganews.com!border3.nntp.ams.giganews.com!border1.nntp.ams.giganews.com!nntp.giganews.com!newsreader4.netcologne.de!news.netcologne.de!feeder.erje.net!eu.feeder.erje.net!weretis.net!feeder1.news.weretis.net!news.solani.org!.POSTED!not-for-mail
References: <67344604-5bb5-4c97-8e55-c8f113c512ce@googlegroups.com>