http://www.perlmonks.org?node_id=608171


in reply to Wildcards and Files

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

[download]

In Section Seekers of Perl Wisdom