if ($request{'find'} && $request{'replace'}) {
       $find=$request{'find'};
       $reptemp=$request{'replace'};
       $replace='$reptemp';
       $line =~ s/$find/$replace/ee;
   }