use lib 'lib';
use IO::All;

my @stuff = qw(one two three);
$stuff[1] .= "xxx\n";

io('-')->println(@stuff);