Help for this page
perl -pale 'print $F[0]; @p=<test/*_$F[0].tst>; s/^/$p[0] /' test.list
perl -pale 'print $F[0]; ($p) = <test/*_$F[0].tst>; s/^/$p /' test.lis +t