if( $mech1->success){print "success \n";} else{print  !$;}
 $mech1->click("Edit article");

    if( $mech1->success){print "Editing article \n";} else{print  !$;}

$mech1->field('text',"$text");