...
# Get all .png files (and .PNG, .Png, etc)
for ($object->grep(Grep => qr/\.png$/i)) {
    $object->get(File => $_);
}