Help for this page
my @test = qw( fake -b -v 5); use IPC::Run qw(run);
run \@tester, \$in, \$out; run \@tester, '>pty>', \$in, '>pty>', \$out;