#/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();