Select Code to Download

 in pseudocode
#usr/bin/perl -w

...
     dealwithregularcommand();
   }
}

 our pseudocode for the loop now looks like this
sub inline
my @asm; #the ASM cmds buffer
...
     dealwithregularcommand();
   }
}

Something like this
sub jump # this is basically all psuedocode the real sub is more compl
+icated but this is the gist
{
...
         &DoAllTheThing!!();  #since the loop/jmp is pushed to the arr
+ay anyway, it will be run in the &doallthethings
     }until($jmptaken == 0)
}

 the real code:
sub interactive
{
...
        }
    } until (uc($iLINE) eq 'QUIT'  or uc($iLINE) eq 'Q' or uc($iLINE) 
+eq 'E' or uc($iLINE) eq 'EXIT');
}