Re: IPC::Open3 emulate tty mode on stdout handle (pty)

IO::Pty?

OTOH its kind of hard to find an app stupid enough to only flush for true ttys

Comment on Re: IPC::Open3 emulate tty mode on stdout handle (pty)

Replies are listed 'Best First'.
Re^2: IPC::Open3 emulate tty mode on stdout handle (pty) by MiklerGM (Novice) on Jul 01, 2013 at 11:04 UTC
I tried something: It stacs on the same place as if i do a regulag fh created by open3. After stack i recieve many lines in one time not as they appear :( `my $pty = new IO::Pty; my $read = $pty->slave; my ($write,$err); $ppid = open3($write, $read,$err, "$bin_dir/$bin $args $pidfile"); print "=>" . $_ while(<$read>);` [download] And this shows nothing: `my $pty = new IO::Pty; local *READ = $pty->slave; my ($write,$err); $ppid = open3($write, ">&READ",$err, "$bin_dir/$bin $args $pidfile"); print "=>" . $_ while(<READ>);` [download]	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re^2: IPC::Open3 emulate tty mode on stdout handle (pty)
by MiklerGM (Novice) on Jul 01, 2013 at 11:04 UTC

my $pty = new IO::Pty;
my $read = $pty->slave;
my ($write,$err);
$ppid = open3($write, $read,$err, "$bin_dir/$bin $args $pidfile");
print "=>" .  $_ while(<$read>);
[download]

my $pty = new IO::Pty;
local *READ = $pty->slave;
my ($write,$err);
$ppid = open3($write, ">&READ",$err, "$bin_dir/$bin $args $pidfile");
print "=>" .  $_ while(<READ>);
[download]

[reply]
[d/l]
[select]