(no subject)

[Daniel L Quigley-Skillin]

sub refresh
{
        @recieved=$host->getline;
        print @recieved;
        &refresh;
}

How do I get this to continue looping to display information as it is
recieved, and allow me to enter commands?

Currently, if I do something like..

sub refresh
{
        @recieved=$host->getline;
        print @recieved;
        $input=<STDIN>;
        &refresh;
}

It pauses waiting for input.

In addition, if information isn't recieved, it times out.

read timed-out at netapp.pl line 124

How do I avoid this?

Thanks,

D-




_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-admin