Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much

Clunky parsing problem, looking for simple solution

by clintp (Curate)
on Jun 16, 2002 at 01:42 UTC ( #174889=perlquestion: print w/ replies, xml ) Need Help??

Help for this page

Select Code to Download

  1. or download this
       LN  IF X GOTO LN.A
            GOTO LN.B
            GOTO LN.C
       LN.B Z
       LN.C REM 
  2. or download this
    7130 IF B3<>0 THEN PRINT "FROM E TO S":W1=B4:X=B5:GOTO 6920
    9810 IF K$="Y" AND RND(1) <.5 THEN GOTO 9820 ELSE GOTO 9770
    4835 IF V$="K" THEN A$="+K+" ELSE IF V$="M" THEN A$="!M!" ELSE IF V$="
    +R" THEN A$="?R?"
    1850 IF K3=0 AND EX(Q1,Q2)=0 THEN GOTO 8500 ELSE GOSUB 6000
    1800 IF V$="K" THEN A$="+K+" ELSE IF V$="R" THEN A$="?R?" ELSE IF V$="
    +M" THEN A$="!M!":Z1=R1:Z2=R2
  3. or download this
    1800   IF V$="K" THEN GOTO 1800.2
    1800.1 GOTO 1800.4
    1800.b Z1=R1
    1800.c Z2=R2
    1800.d REM

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://174889]
Approved by Kanji
Front-paged by ajt
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others chilling in the Monastery: (5)
As of 2014-12-21 20:52 GMT
Find Nodes?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?

    Results (107 votes), past polls