realplayer 向けの *.lst file を作成するスクリプトを書いています。
下記の二行目において @music_file をファイルが作成された順に
sort したいのですが、何かよい方法はありますでしょうか？
( file がおいてある dir でsystem ( ls -l ) を実行してファイルと
日付のhash を作成し、日付から sort することを考えています。)

****************************************************************
opendir ( DIR, $Source_DIR ) || die "failed open dir";
@music_file = sort grep { -f "$Source_DIR/$_" } readdir( DIR );
closedir( DIR );

open( FILE, ">./$LIST_FILE" ) || die "failed open file";
foreach $music ( @music_file ) {
if ( $music =~ m/mp3$/ ) {
printf ( FILE "file://$Source_DIR/$music\n" );
}
}
close ( FILE );
****************************************************************