my $t = scalar (@temp);
    splice (@temp,$t-1,1) if ($t );
    @jobstack=@temp;

##</code><code>##

pop @jobstack.