use warnings;
use strict;
BEGIN { $ENV{IPCRUN3DEBUG} = 1 }
use IPC::Run3 'run3';
use Win32::ShellQuote qw/quote_system_string/;

my $filepath = shift;
my $command = join ' ', 
    quote_system_string("C:\\Program Files\\dBpoweramp\\coreconverter.exe"),
    "-outfile=".quote_system_string("nul"),
    "-convert_to=".quote_system_string("wave"),
    "-errorfile=".quote_system_string("core.err"),
    "-infile=".quote_system_string($filepath);
run3 $command;