On Tue, 4 Mar 2003, Sudarshan Raghavan wrote: > The problem is with the last \s+, when you are parsing the final tuple > $rest contains this '-h ten-me-900'. Due to the final \s+ the above regex > will not match. This leaves $opt, $arg and $newRest as undefined. Change > the final \s+ to \s* and you will be fine. The above regex can actually be > written as > > $rest =~ /^\s*(-[a-z])\s*(\S+)(.*)$/
You don't need a [a-z] either, just a [rxh] should do -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
