$post{$element} = $1
  if $html =~ m/id="$element" name="challenge" value="(.*?)"/;

##</code><code>##

m/id="\Q$element\E" name="challenge" value="(.*?)"/;