use String::ShellQuote qw( shell_quote );

my $cmd = shell_quote( "prog", $_->{Sub_URL}, "(?i)Podcast", @args );
system( $cmd );

##</code><code>##

my @cmd = ( "prog", $_->{Sub_URL}, "(?i)Podcast", @args );
system( { $cmd[0] } @cmd );