Come leggere l'elenco di file in una directory in perl?

Utilizzando il perl, come si può ottenere l'elenco di file presenti nella directory corrente? È semplice, ma siccome non mi ricordo mai lo posto qui!

#!/usr/bin/perl -w

@files = <*.txt>;
foreach $file (@files) {
  print $file . "\n";
}

in questo caso vengono listati tutti i files con estensione .txt.