Select Code to Download

....
<form method="post" action="login.lp" name="authform" id="authform">
        <input type="hidden" name="rn" value="-1383135969">

$message =~ /\"rn\"\s+value\=+"([^"]+)"/ ;
$rn= $1;