sub tHelp(\$topics) if ($Session->{'usrType'} eq 'Std') { if ($Request->ServerVariables("SERVER_NAME")->item()=~/tempohelp/i) { my $startpoint=$topics($topic);'Content/HELP/TPO/default/Tempo_help-08-1.html'; my $target='Tempo%20help_frame'; $str .= shadowBox("Tempo Help", qq^^ , ($g_docWidth/5*4-(2*$g_docSpace))); return $str; } }