On 21 Apr 2012, at 19:13, Torsten Knorr wrote: > ($label, $opcode) = m/^\s* > (?::(\w+)\s+)? # label > ([A-Za-z]+)\s+ # opcode > (?:([^,\s]+)(?{push(@operands, $^N)}),?\s*)* # operands > $/x; ~~~NO CARRIER Your modem cable is loose.