Select Code to Download

$text .= 'blah<input type="hidden" name="FOO" value="123-01">blah';
$text .= "\nblah\n";
...
$page = (($text =~ m/name="VERIFIER"\ value="([-0-9]+?)">/xg),$1)[0];

print "$page";

$page = (($text =~ m/<input\ type="hidden"\ name="VERIFIER"\ value="(\
+d+)\-(\d+)">/xg),$1.'-'.$2)[0];

$page = (($text =~ m/<input\ type="hidden"\ name="VERIFIER"\ value="(\
+d+)\-(\d+)">/xg),$1.'-'.$2)[1];