I sort of have an approach, this is how I plan do things, do you see issues, (performance etc?) or any other flaws?
my $fh = File::Temp->new(); my $fname = $fh->filename; print $fh $code; close $fh; my $retVal = "nothing"; $retVal = timeout 5 => sub { my $r = `perl $fname $arg &2>1`; return $r; }; if ($@){ return $@; } return $retVal;
My issue is that if $code has an error, that error is printed into the dancer bash console, I want to capture it instead.
UpdateI also tried using capture_exec from IO::CaptureOutput, but this time, I get the STDERR but STDOUT is instead printed onto the bash command line, if there was a success :( *sigh*.
I did ($stdout, $stderr, $success, $ex) = capture_exec('perl', "$fname","$arg");
In reply to Re^2: running string as perl script and pass into STDIN programatically
by gideondsouza
in thread running string as perl script and pass into STDIN programatically
by gideondsouza
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |