l i n u x - u s e r s - g r o u p - o f - d a v i s
Next Meeting:
July 7: Social gathering
Next Installfest:
Latest News:
Jun. 14: June LUGOD meeting cancelled
Page last updated:
2001 Dec 30 16:57

The following is an archive of a post made to our 'vox-tech mailing list' by one of its subscribers.

Report this post as spam:

(Enter your email address)
Re: [vox-tech] Perl: setting default input channel?
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [vox-tech] Perl: setting default input channel?

  • Subject: Re: [vox-tech] Perl: setting default input channel?
  • From: miMAPScah@cowanbox.com
  • Date: Fri, 15 Sep 2000 13:21:43 -0700
  • References: Pine.GSO.4.21.0009151212480.6826-100000@runner.ucdavis.edu

On Fri, Sep 15, 2000 at 12:18:22PM -0700, Mark Kim wrote:
> During the Perl talk, Micah talked about how one can set the default
> output channel in Perl.  I can't remember if he talked about setting the
> default input channel, but I can't seem to find out how to do it in
> Perl.  Is there a way?
> ---
> Mark K. Kim
> http://www.cbreak.org/mark/
> PGP key available upon request

No, because there are no reading methods which can be used with a default.
Whereas, in output, you can use functions like print without specifying
the filehandle, input methods always require you to specify the handle,
even if it's STDIN (the exception would be while (<>) loops).  The most
common method of reading is in fact just an operator one applies to

The closest thing you could do would be to reopen STDIN to something else,

open (STDIN, "<some_other_file.txt");

If you wanted to revert to the /real/ STDIN, do this:

open (STDIN, "<-");

Hope that helps.


LUGOD Group on LinkedIn
Sign up for LUGOD event announcements
Your email address:
LUGOD Group on Facebook
'Like' LUGOD on Facebook:

Hosting provided by:
Sunset Systems
Sunset Systems offers preconfigured Linux systems, remote system administration and custom software development.

LUGOD: Linux Users' Group of Davis
PO Box 2082, Davis, CA 95617
Contact Us

LUGOD is a 501(c)7 non-profit organization
based in Davis, California
and serving the Sacramento area.
"Linux" is a trademark of Linus Torvalds.

Sponsored in part by:
EDGE Tech Corp.
For donating some give-aways for our meetings.