Perlを使用してファイル名を取得する

Question

* .isoという名前のファイルがあります。*は任意の文字列（ドット、数字、アルファベット、スラッシュ文字）です。 /dm2/www/html/isos/preFCS5.3/

に位置しています.ISO

*私は$ファイル名にこのファイル名を取得したいです。私はそれがとてもシンプルだと分かっています。 Perlでどうすればいいですか？詳細情報については

Answer 1

使用File::Util

use strict; 
use warnings; 
use File::Util; 

my $file_util = File::Util->new; 
my $base = '/dm2/www/html/isos/preFCS5.3/'; 
my @isos = $file_util->list_dir(
    $base, 
    '--recurse', 
    '--files-only', 
    '--pattern=\.iso$' 
); 

Answer 2

my($filename) = glob('/dm2/www/html/isos/preFCS5.3/*.iso'); 

：http://perldoc.perl.org/functions/glob.html