A
alexjaquet
Hi,
I try to use the module AudioFile::Info with this simple script :
#!c:/Perl/bin/perl.exe
use AudioFile::Info;
use strict;
my @dir_contents;
my $dir_to_open= "C:/Apache2/htdocs/recordz/sound-list";
opendir(DIR,$dir_to_open) || die("Cannot open directory !\n");
@dir_contents= readdir(DIR);
closedir(DIR);
foreach my $file (@dir_contents)
{
if(!(($file eq ".") || ($file eq "..")))
{
my $song = AudioFile::Info->new($file);
my $title = $song->title;
my $artist = $song->artist;
my $album = $song->album;
my $track = $song->track;
my $year = $song->year;
my $genre = $song->genre;
print "title : $title";
}
}
but I got this error Couldn't open
C:/Perl/site/lib/AudioFile/plugins.yaml
I try to use the module AudioFile::Info with this simple script :
#!c:/Perl/bin/perl.exe
use AudioFile::Info;
use strict;
my @dir_contents;
my $dir_to_open= "C:/Apache2/htdocs/recordz/sound-list";
opendir(DIR,$dir_to_open) || die("Cannot open directory !\n");
@dir_contents= readdir(DIR);
closedir(DIR);
foreach my $file (@dir_contents)
{
if(!(($file eq ".") || ($file eq "..")))
{
my $song = AudioFile::Info->new($file);
my $title = $song->title;
my $artist = $song->artist;
my $album = $song->album;
my $track = $song->track;
my $year = $song->year;
my $genre = $song->genre;
print "title : $title";
}
}
but I got this error Couldn't open
C:/Perl/site/lib/AudioFile/plugins.yaml