(List
  (Com {[LIT_OTHER ":"]})
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('command', {[LIT_CHARS crontab]})])
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('prefix', {[VarSub 0 transform_ops=[VS_UNARY_DPOUND {[LIT_CHARS "*"] [LIT_SLASH /]}]]})])
  (Case to_match={[VarSub prefix]}, pat_word_list=[[{[LIT_OTHER "*"] [LIT_CHARS _] [LIT_OTHER "*"]}], [{[LIT_OTHER "*"]}]]
    (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('prefix', {[VarSub prefix transform_ops=[VS_UNARY_DPERCENT {[LIT_CHARS "_*"]}]] [LIT_CHARS _]})])
    (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('prefix', {[SQ ]})])
  )
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('cron', {[DQ [VarSub prefix][LIT_CHARS "at -qc"]]})])
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('file', {[VarSub HOME] [LIT_CHARS /.] [VarSub command]})])
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('replace', {[SQ ]})])
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('temp', {[VarSub TMPDIR test_op=VS_TEST_COLON_HYPHEN {[LIT_SLASH /] [LIT_CHARS tmp]}] [LIT_CHARS /cron] [VarSub $]})])
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('op', {[SQ ]})])
  (Case to_match={[ComSub (List (Com redirects=[(FilenameRedirectNode filename={[LIT_CHARS /dev/null]} <REDIR_GREAT "2>"> 2)]{[LIT_CHARS getopts]} {[SQ <LIT_CHARS "[-][123:xyz]">]} {[LIT_CHARS opt]} {[LIT_CHARS --xyz]}) (Com {[LIT_CHARS echo]} {[LIT_CHARS 0] [VarSub opt]}) )]}, pat_word_list=[[{[LIT_CHARS 0123]}], [{[LIT_OTHER "*"]}]]
    (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('usage', {[SQ <LIT_CHARS "\n"> <LIT_CHARS "[-?\n"> <LIT_CHARS "@(#)$Id: crontab (AT&T Labs Research) 2006-05-17 $\n"> <LIT_CHARS "]\n">] [VarSub USAGE_LICENSE] [SQ <LIT_CHARS "\n"> <LIT_CHARS "[+NAME?crontab - schedule periodic background work]\n"> <LIT_CHARS "[+DESCRIPTION?\\bcrontab\\b creates, replaces or edits the calling user crontab\n"> <LIT_CHARS "\tentry; a crontab entry is a list of commands and the times at which\n"> <LIT_CHARS "\tthey are to be executed. The new crontab entry can be input by\n"> <LIT_CHARS "\tspecifying \\afile\\a, or input from standard input if \\afile\\a is\n"> <LIT_CHARS "\tomitted, or by using an editor, if \\b--edit\\b is specified. The\n"> <LIT_CHARS "\tactual crontab entry is maintained in the file \\b$HOME/.crontab\\b.]\n"> <LIT_CHARS "[+?Upon execution of a command from a crontab entry, the implementation will\n"> <LIT_CHARS "\tsupply a default environment, defining at least the following\n"> <LIT_CHARS "\tenvironment variables:]{\n"> <LIT_CHARS "\t[+HOME?A pathname of the calling user home directory.]\n"> <LIT_CHARS "\t[+LOGNAME?The calling user login name.]\n"> <LIT_CHARS "\t[+PATH?A string representing a search path guaranteed to find all\n"> <LIT_CHARS "\t\tof the standard utilities.]\n"> <LIT_CHARS "\t[+SHELL?A pathname of the command interpreter \\bsh\\b(1).]\n"> <LIT_CHARS "}\n"> <LIT_CHARS "[+?If standard output and standard error are not redirected by commands\n"> <LIT_CHARS "\texecuted from the crontab entry, any generated output or errors will\n"> <LIT_CHARS "\tbe mailed to the calling user.]\n"> <LIT_CHARS "[+?Users are permitted to use \\bcrontab\\b if their names appear in the file\n"> <LIT_CHARS "\t\\b/usr/lib/cron/cron.allow\\b. If that file does not exist, the file\n"> <LIT_CHARS "\t\\b/usr/lib/cron/cron.deny\\b is checked to determine if the calling user\n"> <LIT_CHARS "\tshould be denied access to \\bcrontab\\b. If neither file exists, only\n"> <LIT_CHARS "\ta process with appropriate privileges is allowed to submit a job. If\n"> <LIT_CHARS "\tonly \\bcron.deny\\b exists and is empty, global usage is permitted. The\n"> <LIT_CHARS "\t\\bcron.allow\\b and \\bcron.deny\\b files consist of one user name per\n"> <LIT_CHARS "\tline.]\n"> <LIT_CHARS "[+?In this implementation, each command in the \\bcrontab\\b file represents\n"> <LIT_CHARS "\ta single \\bat\\b(1) \\ajob\\a. Only one job per command will be executed.\n"> <LIT_CHARS "\tA new job for a given command will not be scheduled until the previous\n"> <LIT_CHARS "\tjob for that command, if any, has exited.]\n"> <LIT_CHARS "[e:edit?Edit a copy of the calling user crontab entry, or create an empty\n"> <LIT_CHARS "\tentry to edit if the crontab entry does not exist. When editing is\n"> <LIT_CHARS "\tcomplete, the entry will be installed as the calling user crontab\n"> <LIT_CHARS "\tentry. The editor used is defined by the \\bEDITOR\\b environment\n"> <LIT_CHARS "\tvariable. The default editor is \\bvi\\b(1).]\n"> <LIT_CHARS "[l:list?List the calling user crontab entry.]\n"> <LIT_CHARS "[r:remove|delete?Remove the calling user crontab entry.]\n"> <LIT_CHARS "\n"> <LIT_CHARS "[ file ]\n"> <LIT_CHARS "\n"> <LIT_CHARS "[+INPUT FILES?A crontab entry must be a text file consisting of lines of six\n"> <LIT_CHARS "\tfields each. The fields must be separated by blank characters. The\n"> <LIT_CHARS "\tfirst five fields must be integer patterns that specify the\n"> <LIT_CHARS "\tfollowing:]{\n"> <LIT_CHARS "\t[+1.?Minute (0-59)]\n"> <LIT_CHARS "\t[+2.?Hour (0-23)]\n"> <LIT_CHARS "\t[+3.?Day of the month (1-31)]\n"> <LIT_CHARS "\t[+4.?Month of the year (1-12)]\n"> <LIT_CHARS "\t[+5.?Day of the week (0-6 with 0=Sunday)]\n"> <LIT_CHARS "}\n"> <LIT_CHARS "[+?Each of these patterns can be either an asterisk (meaning all valid\n"> <LIT_CHARS "\tvalues), an element or a list of elements separated by commas.\n"> <LIT_CHARS "\tAn element must be either a number or two numbers separated by a\n"> <LIT_CHARS "\thyphen (meaning an inclusive range). The specification of days can\n"> <LIT_CHARS "\tbe made by two fields (day of the month and day of the week). If\n"> <LIT_CHARS "\tmonth, day of month and day of week are all asterisks, every day\n"> <LIT_CHARS "\twill be matched. If either the month or day of month is specified\n"> <LIT_CHARS "\tas an element or list, but the day of week is an asterisk, the\n"> <LIT_CHARS "\tmonth and day of month fields will specify the days that match. If\n"> <LIT_CHARS "\tboth month and day of month are specified as asterisk, but day of\n"> <LIT_CHARS "\tweek is an element or list, then only the specified days of the\n"> <LIT_CHARS "\tweek will match. Finally, if either the month or day of month is\n"> <LIT_CHARS "\tspecified as an element or list, and the day of week is also\n"> <LIT_CHARS "\tspecified as an element or list, then any day matching either the\n"> <LIT_CHARS "\tmonth and day of month or the day of week, will be matched.]\n"> <LIT_CHARS "[+?The sixth field of a line in a crontab entry is a string that will\n"> <LIT_CHARS "\tbe executed by \\bsh\\b at the specified times.  A percent sign character\n"> <LIT_CHARS "\tin this field will be translated to a newline character. Any\n"> <LIT_CHARS "\tcharacter preceded by a backslash (including the %) causes that\n"> <LIT_CHARS "\tcharacter to be treated literally. Only the first line (up to a \"%\"\n"> <LIT_CHARS "\tor end-of-line) of the command field will be executed by the\n"> <LIT_CHARS "\tcommand interpreter. The other lines will be made available to the\n"> <LIT_CHARS "\tcommand as standard input.]\n"> <LIT_CHARS "[+?A job label is generated by a readable hash of the command. If the first\n"> <LIT_CHARS "\tcharacters are \\b:\\b \\alabel\\a\\b;\\b then the job label will be set to\n"> <LIT_CHARS "\t\\alabel\\a verbatim. Job labels are limited to 12 characters.]\n"> <LIT_CHARS "[+?Blank lines and those whose first non-blank character is \"#\" will\n"> <LIT_CHARS "\tbe ignored.]\n"> <LIT_CHARS "[+FILES]{\n"> <LIT_CHARS "\t[+$HOME/.crontab?Edited per-user crontab entry file.]\n"> <LIT_CHARS "}\n"> <LIT_CHARS "[+SEE ALSO?\\bat\\b(1), \\bbatch\\b(1), \\bsh\\b(1)]\n">]})])
    (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('usage', {[SQ <LIT_CHARS "elr [ file ]">]})])
  )
  (While
    (Com {[LIT_CHARS getopts]} {[DQ [VarSub usage]]} {[LIT_CHARS OPT]})
    (Case to_match={[VarSub OPT]}, pat_word_list=[[{[LIT_CHARS e]}], [{[LIT_CHARS l]}], [{[LIT_CHARS r]}], [{[LIT_OTHER "*"]}]]
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('op', {[LIT_CHARS edit]})])
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('op', {[LIT_CHARS list]})])
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('op', {[LIT_CHARS remove]})])
      (List
        (Com {[LIT_CHARS echo]} {[DQ [LIT_CHARS "Usage: "][VarSub command][LIT_CHARS " [-elr] [ file ]"]]}
          <
          (DescriptorRedirectNode target={[LIT_CHARS 2]} <REDIR_GREATAND ">&"> 1),
          >
        )
        (Com {[LIT_CHARS exit]} {[LIT_CHARS 2]})
      )
    )
  )
  (Com {[LIT_CHARS shift]} {[ArithSub {A2 AS_OP_MINUS {A Atom NODE_ARITH_WORD {[VarSub OPTIND]}} {A Atom NODE_ARITH_WORD {[AS_NUM_LITERAL 1]}}}]})
  (Case to_match={[VarSub #]}, pat_word_list=[[{[LIT_CHARS 0]}], [{[LIT_CHARS 1]}]]
    (ElseTrue)
    (List
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('replace', {[VarSub 1]})])
      (Com {[LIT_CHARS shift]})
    )
  )
  (Case to_match={[VarSub op]}, pat_word_list=[[{[SQ ]}], [{[LIT_OTHER "*"]}]]
    (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('op', {[LIT_CHARS replace]})])
    (Case to_match={[VarSub replace]}, pat_word_list=[[{[LIT_OTHER "?"] [LIT_OTHER "*"]}]]
      (Com {[LIT_CHARS set]} {[LIT_CHARS --]} {[SQ <LIT_CHARS "-?">]})
    )
  )
  (Case to_match={[VarSub #]}, pat_word_list=[[{[LIT_CHARS 0]}], [{[LIT_OTHER "*"]}]]
    (ElseTrue)
    (List
      (Com {[LIT_CHARS getopts]} {[DQ [VarSub usage]]} {[LIT_CHARS OPT]})
      (Com {[LIT_CHARS exit]} {[LIT_CHARS 2]})
    )
  )
  (Com {[LIT_CHARS set]} {[LIT_CHARS -o]} {[LIT_CHARS errexit]} {[LIT_CHARS -o]} {[LIT_CHARS noglob]})
  (Com {[VarSub cron]} {[LIT_CHARS -a]})
  (Com {[LIT_CHARS umask]} {[LIT_CHARS 077]})
  (Case to_match={[VarSub op]}, pat_word_list=[[{[LIT_CHARS edit]}], [{[LIT_CHARS list]}], [{[LIT_CHARS remove]}], [{[LIT_CHARS replace]}]]
    (List
      (Com {[LIT_CHARS trap]} {[DQ [LIT_CHARS "rm -f '"][VarSub temp][LIT_CHARS "'"]]} {[LIT_CHARS 0]} {[LIT_CHARS 1]} {[LIT_CHARS 2]} {[LIT_CHARS 3]} {[LIT_CHARS 15]})
      (If
        (Com {[LIT_CHARS test]} {[LIT_CHARS -f]} {[DQ [VarSub file]]})
        (Com {[LIT_CHARS cat]} {[DQ [VarSub file]]})
        (ElseTrue)
        (Com {[LIT_CHARS print]} {[DQ [LIT_CHARS "# MIN HOUR DAY/MONTH MONTH DAY/WEEK COMMAND"]]})
      )
      (Com {[VarSub VISUAL test_op=VS_TEST_COLON_HYPHEN {[VarSub EDITOR test_op=VS_TEST_COLON_HYPHEN {[LIT_CHARS vi]}]}]} {[DQ [VarSub temp]]})
    )
    (List
      (If
        (Com {[LIT_CHARS test]} {[LIT_CHARS -f]} {[DQ [VarSub file]]})
        (Com {[LIT_CHARS cat]} {[DQ [VarSub file]]})
      )
      (Com {[LIT_CHARS exit]})
    )
    (List
      (Com {[VarSub cron]} {[LIT_CHARS -r]})
      (Com {[LIT_CHARS rm]} {[LIT_CHARS -f]} {[DQ [VarSub file]]})
      (Com {[LIT_CHARS exit]})
    )
    (List
      (Com {[LIT_CHARS trap]} {[DQ [LIT_CHARS "rm -f '"][VarSub temp][LIT_CHARS "'"]]} {[LIT_CHARS 0]} {[LIT_CHARS 1]} {[LIT_CHARS 2]} {[LIT_CHARS 3]} {[LIT_CHARS 15]})
      (Case to_match={[VarSub replace]}, pat_word_list=[[{[LIT_CHARS -]}], [{[DQ ]}], [{[LIT_OTHER "*"]}]]
        (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('temp', {[VarSub file]})])
        (Com {[LIT_CHARS cat]}
          <
          (FilenameRedirectNode filename={[DQ [VarSub temp]]} <REDIR_GREAT ">"> 1),
          >
        )
        (Com {[LIT_CHARS cat]} {[DQ [VarSub replace]]}
          <
          (FilenameRedirectNode filename={[DQ [VarSub temp]]} <REDIR_GREAT ">"> 1),
          >
        )
      )
      (Com {[LIT_CHARS test]} {[LIT_CHARS -s]} {[DQ [VarSub temp]]})
    )
  )
  (Com {[LIT_CHARS exec]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS /dev/null]} <REDIR_GREAT ">"> 1),
    >
  )
  (While
    (Com {[LIT_CHARS read]} {[LIT_CHARS -r]} {[LIT_CHARS line]})
    (List
      (Com {[LIT_CHARS set]} {[SQ ]} {[VarSub line]})
      (Com {[LIT_CHARS shift]})
      (Case to_match={[VarSub 1]}, pat_word_list=[[{[SQ ]}, {[SQ <LIT_CHARS "#">] [LIT_OTHER "*"]}]]
        (Com {[LIT_CHARS continue]})
      )
      (Case to_match={[VarSub #]}, pat_word_list=[[{[LIT_OTHER "["] [LIT_CHARS 0-5] [LIT_OTHER "]"]}]]
        (Com {[LIT_CHARS print]} {[LIT_CHARS -u2]} {[DQ [VarSub command][LIT_CHARS ": "][VarSub line][LIT_CHARS ": invalid entry"]]})
      )
      (Com {[VarSub cron]} {[LIT_CHARS -n]} {[LIT_CHARS -t]} {[DQ [LIT_CHARS "cron "][VarSub 1][LIT_CHARS " "][VarSub 2][LIT_CHARS " "][VarSub 3][LIT_CHARS " "][VarSub 4][LIT_CHARS " "][VarSub 5]]} {[LIT_CHARS true]})
    )
  )
  (Com {[VarSub cron]} {[LIT_CHARS -r]})
  (While
    (Com {[LIT_CHARS read]} {[LIT_CHARS -r]} {[LIT_CHARS line]})
    (List
      (Com {[LIT_CHARS set]} {[SQ ]} {[VarSub line]})
      (Com {[LIT_CHARS shift]})
      (Case to_match={[VarSub 1]}, pat_word_list=[[{[SQ ]}, {[SQ <LIT_CHARS "#">] [LIT_OTHER "*"]}]]
        (Com {[LIT_CHARS continue]})
      )
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('time', {[DQ [VarSub 1][LIT_CHARS " "][VarSub 2][LIT_CHARS " "][VarSub 3][LIT_CHARS " "][VarSub 4][LIT_CHARS " "][VarSub 5]]})])
      (Com {[LIT_CHARS shift]} {[LIT_CHARS 5]})
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('exec', {[VarSub * transform_ops=[PatSub {[\ LIT_ESCAPED_CHAR "\\\\"] [LIT_CHARS "(?)"]} {[LIT_CHARS "\u0001"] [\ LIT_ESCAPED_CHAR "\\1"]} do_all]]})])
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('exec', {[VarSub exec transform_ops=[PatSub {[LIT_CHARS "@([!\u0001])"] [LIT_PERCENT "%"]} {[\ LIT_ESCAPED_CHAR "\\1"] [LIT_CHARS "\n"]} do_all]]})])
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('exec', {[VarSub exec transform_ops=[PatSub {[LIT_CHARS "^A"]} {[\ LIT_ESCAPED_CHAR "\\\\"]} do_all]]})])
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('exec', {[VarSub exec transform_ops=[PatSub {[LIT_CHARS "@(\n"] [LIT_CHARS "*)"]} {[\ LIT_ESCAPED_CHAR "\\<"] [\ LIT_ESCAPED_CHAR "\\<"] [\ LIT_ESCAPED_CHAR "\\\\"] [LIT_CHARS "\u0001\n"] [\ LIT_ESCAPED_CHAR "\\1"] [LIT_CHARS "\n"] [LIT_CHARS "\u0001"]} do_all]]})])
      (Com {[VarSub cron]} {[LIT_CHARS -t]} {[DQ [LIT_CHARS "cron "][VarSub time]]} {[DQ [VarSub exec]]}
        <
        (FilenameRedirectNode filename={[LIT_CHARS /dev/null]} <REDIR_GREAT "2>"> 2),
        >
      )
    )
  )
  (Case to_match={[VarSub replace]}, pat_word_list=[[{[LIT_CHARS -]}], [{[LIT_OTHER "*"]}]]
    (ElseTrue)
    (Com {[LIT_CHARS cp]} {[DQ [VarSub temp]]} {[DQ [VarSub file]]})
  )
)