use Encode;

open(dd,"table2");
$id=0;
while(<dd>){
chomp;
if(/(\S+?\.wav)/i){
$file=uc($1);
print `ffmpeg -i ../cutter/sound$id.wav -ar 22050 -ac 1 -y Res/$file`;
$id++;
}


}