Perl

@files = glob("*.tar.gz");