foreach (@files)
{
if ($_=~ m/^sss(\W+))
{
push @wantedArray,$_
};
}