my $data_str = join('', @data);

my $results1 =`command1 $data_str`;
my $results2 =`command2 $results1`;

print $results2;