sub tHelp
  {
$baseurl=shift(@baseurl); 
$startpoint=shift(@topicvalues);
$Response->write("$baseurl"."$startpoint");
# This returns values for baseurl and startpoint so far so #good
then deeper in my sub when I go to use startpoint it does not work why
+?
if ($Session->{'usrType'} eq 'Std')
   {
    if ($Request->ServerVariables("SERVER_NAME")->item()=~/tempohelp/i
+)
{
$startpoint=shift(@topicvalues);
$baseurl=shift(@baseurl);
 #my startpoint='Content/HELP/TPO/default/Tempo_help-08-1.html';
my $target='Tempo%20help_frame';
$str .= shadowBox("Tempo Help", qq^<help_iframe name="$target" startpo
+int="$startpoint"/>^ , ($g_docWidth/5*4-(2*$g_docSpace)));
       return $str;
    }
}

  

finally code for loop to generate helpfile into iframe. 
if ( $Request->ServerVariables("SERVER_NAME")->item() =~ /tempohelp/ )
+ {
        my $toc_file = ( $Session->{'usrType'} eq 'Pro' ) ? 'e:\Suppor
+tWeb\Content\HELP\PRO\TOC.html' : 'e:\SupportWeb\Content\help\tpo\def
+ault\TOC.html';
my $user_type = uc $Session->{'usrType'};
if ($user_type='STD')
{$user_type='TPO/default/'}
open TOC, $toc_file;
my @toc_lines = <TOC>;
close TOC;
        
        foreach my $line ( @toc_lines ) { 
            $content .= qq^<rlink tab="Help" script="frames['help_ifra
+me'].location.href='Content/HELP/$user_type/$1'" title="$3">
                        </rlink>^ if ( $line =~ /<p class="pTOC\d"><a 
+href="(.*?)"\s+target="(.*?)">(.*?)<\/a>/ );
                    
        }
        $content .= '</leftIndex>';    
    }