I tried out but 'grep' doesn't strip the filename out of the bigger string, now pop up menu has entries like this:

D:/www/data/text/name_of_the_file.txt
[download]

I personally believe that then you should explain what it is that you want. Based on other nodes in this thread, I suppose that that's 'name_of_the_file.txt'. In that case, I would do:

# untested
use File::Basename;
my @menu_files = map { my $n=basename $_;
                       $n =~ /\.txt$/ ? $n : () } @files;
[download]

--
If you can't understand the incipit, then please check the IPB Campaign.