|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Albert N. MICHEEV 2:5049/80 18 Jun 2001 15:16:07
To : Ruslan Bondarev
Subject : ñîäåpæèìîå ôàéëà - íàpyæy/ (âûïîëíèòü ïpè ïîìîùè îäíîãî îïåpàòîpà
--------------------------------------------------------------------------------
Ïpèâåò Ruslan!
ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
Îòâå÷àÿ íà ïèñüìî Ruslan Bondarev ê Pavel Ammosov îò <18 Èþí 01>:
RB> Ñîãëàñåí. Ýòî áûë íàêîëåííûé ïpèìåp påøåíèÿ ïpîñòîé çàäà÷è. Â
RB> påàëüíîé æèçíè ÿ ÷àñòî èñïîëüçyþ íå die, à ñâîé ñîáñòâåííûé
RB> îápàáîò÷èê îøèáêè. Î÷åíü ÷àñòî ïîëüçyþñü òàêîé ôèøêîé:
RB> {
RB> local *FH;
RB> open FH, "< $file" || (warn("read-error at $file: $!"), last);
RB> print <FH>;
RB> }
òû òîëüêî íå ãîâîpè ÷òî ýòî pàáîòàåò.
open FH, "< $file" or ...;
open(FH, "< $file") || ...;
--- ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
* Origin: Ìû èç Ñîâåòñêîãî Ñîþçà, ïpèáûëè ïî êyëüòypíîìy îáìåíy. (2:5049/80)
Âåðíóòüñÿ ê ñïèñêó òåì, ñîðòèðîâàííûõ ïî: âîçðàñòàíèå äàòû óìåíüøåíèå äàòû òåìà àâòîð
|
