Re: RFC: Simple Tied Filehandle code

[James E Keenan]

James E Keenan wrote:
I am requesting comments on namespace for the following package which I 
would like to upload to CPAN.

    package Yet::To::Be::Named;
    use strict;
    use Carp;
    sub TIEHANDLE {
        my $class = shift;
        my @lines = @_;
        bless [EMAIL PROTECTED], $class;
    }
    sub READLINE {
        my $self = shift;
        if (@$self) {
            shift @$self;
        } else {
            croak "List of prompt responses has been exhausted: $!";
        }
    }
    1;

This was uploaded to CPAN today as Tie::Filehandle::Preempt::Stdin.
jimk