# foreach link's $url
if ($render){
           (my $ele = $url )=~s/^.*\///;
           $ele =~ s/[\?=&,;:]/_/gm; ##same regex as above?
           open RENDER, "> $ENV{TEMP}\\_temp_files\\$ele"|| die "unable to write to %TEMP%\\_temp_files\\$ele";
           binmode RENDER;
           print RENDER $resp->content;
           close RENDER;
}