[Info-vax] DCL puzzle/question

[Phillip Helbig---undress to reply]

Consider this code snippet from CDN.COM:

$  I = 0
$LOOP:
$  I = I + 1
$  IF P'I' .EQS. "" THEN GOTO DONE
$  DEST = "P''I'" ! <---------------------- 1
$  CD '&DEST' ! <-------------------------- 2
$ GOTO LOOP
$DONE:

I have a very complicated CD.COM and a few related procedures.  They do 
almost all I want.  However, I wanted to have the ability to switch to 
something like [.FOO.BAR.KLIM.BIM] by specifying only unique parts of 
the subdirectories, i.e. 

  $ CDN FO B KL BI

Actual cut and paste from the output:

$ CDN FO B KL BI
  DISK$SCRATCH:[HELBIG.FOO]
  DISK$SCRATCH:[HELBIG.FOO.BAR]
  DISK$SCRATCH:[HELBIG.FOO.BAR.KLIM]
  DISK$SCRATCH:[HELBIG.FOO.BAR.KLIM.BIM]

This works as expected.  However, is there a way to combine the lines 1 
and 2 into a single line?