7:      my $tempstring;