Hi all. i am actually trying a program which searched my whole computer for Mp3 files. I am able to search for only a particular drive. I am using windows. And here is my code
#!/usr/bin/perl
use warnings;
my @content =( "Artist","Title","Album","Year","Genre");
use MP3::Tag; # import module
@files = <c:/*.mp3>; # find MP3 files in current directory
#i want to search my whole computer instead of a particular drive..How
+?????
# loop over file list
# print tag information
foreach (@files) {
$mp3 = MP3::Tag->new($_);
$mp3->get_tags();
if (exists $mp3->{ID3v1}) {
#print $_, "\n",
#print "Filename: $filename\n";
print "Artist: " . $mp3->{ID3v2}->artist . "\t";
#print "Length", $mp3 ->{ID3v1}->duration(hh:mm:ss) "\n";
print "Title: " . $mp3->{ID3v1}->title . "\t";
print "Album: " . $mp3->{ID3v1}->album . "\t";
print "Year: " . $mp3->{ID3v1}->year . "\t";
print "Genre: " . $mp3->{ID3v1}->genre . "\n";
Also can anybody give me some ideas of how to search for all music files in my Computer? plz spread the wisdom...Thanks in advance.