for my $file (  glob( "$somedir/example*.txt" )  ) {