$hotfix = sprintf(
  q{%s_%s_%s_%s.zip},
  $app,
  $mod,
  $bld,
  $hf,
);

##</code><code>##

$fullpath = join(q{/}, $dir, $filename);