in reply to Only files starting with xxxx

This is probably the simplest: 
@thefiles = <xxxx*>;

[download]

In Section Seekers of Perl Wisdom