Вывод js через $tpl->set(\');

Ребята помогите, как через $tpl->set(); вывести js который прописан в переменной.

$var23 = "index.php?do=book&id=".$newsid."&p=";
$pegslink= ' ''<script language="javascript">

<!--
function prepare_form(obj){
    
    var a = '.$var23 .';
    //var pathname = window.location.pathname;
    var arr_elements = obj.form.elements;
    var varr=obj.form.variant.value;
    if ((varr >= 1) && (varr <= 30)){
        obj.form.action = a+"&p=" +varr;
    }
    else{
        obj.form.action = "404.html";
    }
    return true;
}
// -->
</script>';

Мне просто нужно в js передавать значение перемоченной из php и я вот решил таким методом сделать.

 Источник:dle-faq.pro, DLE