#!perl 
use strict;
use warnings;

my $res = '  <form method="post" id="iRespect" name="iRespect" action="test.php">
  <table class="editor" style="margin-left:0px" border="0" cellspacing="0">
  <input type="hidden" id="subm" name="subm" value="124ced269d3aeddf3472d9f18a3eedc6" />
  <input type="hidden" id="subm" name="subm" value="e153ad7d20bb170d22a15589c72d984d" /> 
  <input type="hidden" id="subm" name="subm" value="8ac5925741f72d5d4acca9b740218198" /> 
  <input type="hidden" id="act" name="act" value="change_resp" />';
  
my @hash = $res=~/value="([a-f0-9]{32})"/g;
while ( <@hash>)
{ 
    print $_,"\n";
}