perlquestion
nysus
<p>Given this test in <c>test.t</c>:</p>
<c>
#/usr/bin/env perl
use Test::More;
use strict;
use warnings;
use Proc::InvokeEditor;
my $edited_text = Proc::InvokeEditor->edit('edit me');
is $edited_text, "edit you\n", 'can edit text';
done_testing();
</c>
<p>The <a href="https://metacpan.org/pod/Proc::InvokeEditor">Proc::InvokeEditor</a> spawns a new editor instance. When this test is run with <c>prove test.t</c>, you get:</p>
<c>test.t .. Vim: Warning: Output is not to a terminal</c>
<p>The test runs fine with <c>perl test.t</c>. What's the best fix for this?</p>
<!-- Node text goes above. Div tags should contain sig only -->
<div class="pmsig"><div class="pmsig-66801">
<font size=2><p>
$PM = "Perl Monk's";<br>
$MCF = "Most Clueless <strike>Friar</strike> <strike>Abbot</strike> <strike>Bishop</strike> <strike>Pontiff</strike> <strike>Deacon</strike> <strike>Curate</strike> <strike>Priest</strike> Vicar";<br>
$nysus = $PM . ' ' . $MCF;<br>
<a href="http://perlmonks.org/index.pl?node=Offering%20Plate">Click here if you love Perl Monks</a><br></font>
</div></div>