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.