open (XX, "perl -w test_two.pl |");
my @test = <XX>;
close (XX);

##</code><code>##

my @test = `perl -w test_two.pl`;