http://qs321.pair.com?node_id=608171


in reply to Wildcards and Files

use glob 
@files = glob("*.txt");

[download]

In Section Seekers of Perl Wisdom