Re: IPC::Open3 and output

2017-07-10 Thread Chas. Owens
352:trunc(ow/((1/sar)*dar)/2)*2',fps='fps= >>> 20',setsar='1/1' -profile:a aac_he_v2 -strict -2 -y >>> /home/mike/testopen.mp4"; >>> use Text::ParseWords; >>> @args = quotewords('\s+', "'", $str); >>>

Re: IPC::Open3 and output

2017-07-10 Thread Mike Martin
; >> -profile:a aac_he_v2 -strict -2 -y /home/mike/testopen.mp4"; >> use Text::ParseWords; >> @args = quotewords('\s+', "'", $str); >> >> use IPC::Open3; >> >> local(*HIS_IN, *HIS_OUT, *ERR); >> my $cmd='ffmpeg';

Re: IPC::Open3 and output

2017-07-09 Thread Chas. Owens
gt; scale='352:trunc(ow/((1/sar)*dar)/2)*2',fps='fps= 20',setsar='1/1' > -profile:a aac_he_v2 -strict -2 -y /home/mike/testopen.mp4"; > use Text::ParseWords; > @args = quotewords('\s+', "'", $str); > > use IPC::Open3;

IPC::Open3 and output

2017-07-09 Thread Mike Martin
fps= 20',setsar='1/1' -profile:a aac_he_v2 -strict -2 -y /home/mike/testopen.mp4"; use Text::ParseWords; @args = quotewords('\s+', "'", $str); use IPC::Open3; local(*HIS_IN, *HIS_OUT, *ERR); my $cmd='ffmpeg'; my $pid=open3(undef, undef, *ERR,$cmd,

Re: IPC::Open3 Usage

2013-03-22 Thread Brandon McCaig
On Thu, Mar 21, 2013 at 11:12:54PM +0100, Dominik Danter wrote: > Hi I just don't understand the perlfaq example. All I want is to capture > output > of an external command's stdout and stderr. Here is what I've tried: > > sub get_exit() { Careful with those parens. You may not realize, but that

Re: IPC::Open3 Usage

2013-03-21 Thread Charles DeRykus
On Thu, Mar 21, 2013 at 6:41 PM, Charles DeRykus wrote: > On Thu, Mar 21, 2013 at 3:12 PM, Dominik Danter wrote: >> Hi I just don't understand the perlfaq example. All I want is to capture >> output >> of an external command's stdout and stderr. Here is what I've tried: >> >> >> sub get_exit() {

IPC::Open3 Usage

2013-03-21 Thread Dominik Danter
Hi I just don't understand the perlfaq example. All I want is to capture output of an external command's stdout and stderr. Here is what I've tried: sub get_exit() { my ($exit_status, $std_out, $std_err) = @_; my %error_codes = ( 1024 => 'uid already exists', 256 => 'not

Re: How to test Output when using IPC::Open3

2010-08-31 Thread C.DeRykus
useful info on the the 'use Test::Trap ...' import list, especially Shlomi's. -- Charles DeRykus use strict; use warnings; use IPC::Open3; use IO::Handle; use Test::More; use Test::Trap qw( trap $trap :flow :stderr(systemsafe) :stdout(systemsafe) :warn ); $|

Re: How to test Output when using IPC::Open3

2010-08-29 Thread marcos rebelo
We are out of contest in here. I know how to run open3, but I don't know how to test it. Repeating use strict; use warnings; use IPC::Open3; use IO::Handle; use Test::More; use Test::Trap; sub shell_run { my ($stdin, $stdout, $stderr) = map {IO::Handle->new} (0..2); pri

Re: How to test Output when using IPC::Open3

2010-08-29 Thread C.DeRykus
27;ll very likely want to use IO::Select to marshal when the read's occur and search for some sample code. > > On Sun, Aug 29, 2010 at 6:08 AM, John W. Krahn wrote: > > > > > C.DeRykus wrote: > > >> Since you mention simplifying the code, do you actually > &g

Re: How to test Output when using IPC::Open3

2010-08-28 Thread marcos rebelo
the idea is to process the STDOUT ad the STDERR. open don't do it Best Regards Marcos Rebelo On Sun, Aug 29, 2010 at 6:08 AM, John W. Krahn wrote: > C.DeRykus wrote: >> >> Since you mention simplifying the code, do you actually >> need IPC::Open3 ?  In your sample co

Re: How to test Output when using IPC::Open3

2010-08-28 Thread John W. Krahn
C.DeRykus wrote: Since you mention simplifying the code, do you actually need IPC::Open3 ? In your sample code, you're only reading process output. If you don't need IPC::Open3 complexity, you could just use magic open to read output : sub shell_run { print "";

Re: How to test Output when using IPC::Open3

2010-08-28 Thread C.DeRykus
On Aug 28, 12:45 am, ole...@gmail.com (marcos rebelo) wrote: > I'm having a more or less complicated code, that was simplified to this. > > use strict; > use warnings; > use IPC::Open3; > use IO::Handle; > use Test::More; > use Test::Trap; > > sub shell_run {

How to test Output when using IPC::Open3

2010-08-28 Thread marcos rebelo
I'm having a more or less complicated code, that was simplified to this. use strict; use warnings; use IPC::Open3; use IO::Handle; use Test::More; use Test::Trap; sub shell_run { my ($stdin, $stdout, $stderr) = map {IO::Handle->new} (0..2); print ""; ope

Re: IPC::Open3

2001-06-20 Thread Michael Fowler
On Wed, Jun 20, 2001 at 11:26:32AM -0700, Paul Burkett wrote: > Basically I'm suppose to be able to change the cameras > which are displayed on the webpage. Right now I can > change the cameras displayed on the webpage by > accessing Tip and typing in a command like '@01' (any > value through @01-

Re: IPC::Open3

2001-06-20 Thread Paul Burkett
Basically I'm suppose to be able to change the cameras which are displayed on the webpage. Right now I can change the cameras displayed on the webpage by accessing Tip and typing in a command like '@01' (any value through @01-@16) also you can type in '@22' (any value through @22-@44) and it will

Re: IPC::Open3

2001-06-20 Thread Michael Fowler
On Wed, Jun 20, 2001 at 11:06:19AM -0700, Paul Burkett wrote: > He do you or anybody know of a program like TIP > (creates a terminal connection to a remote host) that > will work in Perl, right now all I get is "tip:must be > interactive", thanks. What's giving you this error message? If you're

Re: IPC::Open3

2001-06-20 Thread Paul Burkett
;, thanks. > On Wed, Jun 20, 2001 at 09:59:38AM -0700, Paul > Burkett wrote: > > As a last ditch effort to get this serial device > to > > write I found a Perl module called "IPC::Open3" it > > seems to have the ability to write to a serial > device. > &g

Re: IPC::Open3

2001-06-20 Thread Michael Fowler
On Wed, Jun 20, 2001 at 09:59:38AM -0700, Paul Burkett wrote: > As a last ditch effort to get this serial device to > write I found a Perl module called "IPC::Open3" it > seems to have the ability to write to a serial device. I'm not sure where you got this idea. IPC::

IPC::Open3

2001-06-20 Thread Paul Burkett
As a last ditch effort to get this serial device to write I found a Perl module called "IPC::Open3" it seems to have the ability to write to a serial device. Does any body have any experience with it? I read the documentation on CPAN.org's site numerous times but kept on asking my