my ($title, $artist, $mp3_file);

foreach my $file (@file_names) {
    $mp3_file = new MP3::ID3v1Tag("$file");
    $title = $mp3_file->get_title();
    $artist = $mp3_file ->get_artist();

    print "$title - artist\n";
}