sub get_files {
    my (@dirs) = @_;

    my $level = shift // 3; # level to dig into
    my @files = File::Find::Rule->file()
    ->name('*.bz2') #this line doesn't work
    ->maxdepth($level)
    ->in(@dirs);

    return @files;
}