Re: print FN "junk\n";

2001-06-26 Thread Paul
--- Paul Johnson <[EMAIL PROTECTED]> wrote: > As far as syntax is concerned I thinks that has merit, but Perl has a > number of idioms that you just have to learn. Once learnt, you will > be able to write better programs and maintain others' programs. (Not > that this is necessarily one of tho

Re: print FN "junk\n";

2001-06-26 Thread Paul Johnson
On Tue, Jun 26, 2001 at 01:27:55PM -0700, Paul wrote: > No doubt, and no offense intended. Oh! None taken. > It's just that we have a guy here in th shop who's *neurotic* about > readability, and it's a habit I'm trying to develop. It's not such a bad habit > If a newbie can look at it

Re: print FN "junk\n";

2001-06-26 Thread Randal L. Schwartz
> "Paul" == Paul <[EMAIL PROTECTED]> writes: >> > > select((select(OFN), $| = 1)[0]); Paul> No doubt, and no offense intended. Thank you, since I'm the creator of that mystical snippet. -- Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095 <[EMAIL PROTECTED]> h

Re: print FN "junk\n";

2001-06-26 Thread Paul
--- Paul Johnson <[EMAIL PROTECTED]> wrote: > On Tue, Jun 26, 2001 at 12:59:06PM -0700, Paul wrote: > > > > --- Paul Johnson <[EMAIL PROTECTED]> wrote: > > > select((select(OFN), $| = 1)[0]); > > > > LOL!!! > > Cool! And a lovely pirece of cryptocontext. > > But I'd hate to maintain it la

Re: print FN "junk\n";

2001-06-26 Thread Paul Johnson
On Tue, Jun 26, 2001 at 12:59:06PM -0700, Paul wrote: > > --- Paul Johnson <[EMAIL PROTECTED]> wrote: > > select((select(OFN), $| = 1)[0]); > > LOL!!! > Cool! And a lovely pirece of cryptocontext. > But I'd hate to maintain it later. =o) > Not that I haven't done *FAR* worse! ;op It's act

Re: print FN "junk\n";

2001-06-26 Thread Paul
--- Paul Johnson <[EMAIL PROTECTED]> wrote: > select((select(OFN), $| = 1)[0]); LOL!!! Cool! And a lovely pirece of cryptocontext. But I'd hate to maintain it later. =o) Not that I haven't done *FAR* worse! ;op __ Do You Yahoo!? Get personal

Re: print FN "junk\n";

2001-06-26 Thread Paul Johnson
On Tue, Jun 26, 2001 at 03:42:34PM -0400, Yacketta, Ronald wrote: > what gives, I open a FH (open OFN ">>junk.out" ); > I autoflush.. > $| = 1; > > do some parsing.. do some other gook > then go and print OFN "my output crud\n"; > but yet, nothing is in file... UNTIL I close(OFN); > Huh? me loos

Re: print FN "junk\n";

2001-06-26 Thread Paul
--- "Yacketta, Ronald" <[EMAIL PROTECTED]> wrote: > Folks, > > a really DUH question here.. > > what gives, I open a FH (open OFN ">>junk.out" ); > I autoflush.. > $| = 1; That autoflushes STDOUT. Try this: open OFN, ">>junk.out" or die $!; { my $prevh = select OFN; $|=1; select $prevh; }

Re: print FN "junk\n";

2001-06-26 Thread Brett W. McCoy
On Tue, 26 Jun 2001, Yacketta, Ronald wrote: > what gives, I open a FH (open OFN ">>junk.out" ); > I autoflush.. > $| = 1; > > do some parsing.. do some other gook > then go and print OFN "my output crud\n"; > but yet, nothing is in file... UNTIL I close(OFN); > Huh? me loosing it here.. bring me

print FN "junk\n";

2001-06-26 Thread Yacketta, Ronald
Folks, a really DUH question here.. what gives, I open a FH (open OFN ">>junk.out" ); I autoflush.. $| = 1; do some parsing.. do some other gook then go and print OFN "my output crud\n"; but yet, nothing is in file... UNTIL I close(OFN); Huh? me loosing it here.. bring me back to sanity please