Sure, you can do that. But, in such a simple case, why not simply use glob with the appropriate pattern? Something like this:

my @files = glob ("$dir/*_0828900840_*D602BG");
[download]

Update: this had already been suggested by choroba, sorry for duplication.