Subject:
|
Re: regular expressions for DAT file subpart lines
|
Newsgroups:
|
lugnet.off-topic.geek
|
Date:
|
Tue, 22 Jun 1999 22:58:55 GMT
|
Reply-To:
|
JSPROAT@GEOCITIES.COMspamcake
|
Viewed:
|
168 times
|
| |
|
|
Sproaticus wrote:
> if( $linein =~ m/
> ^
> \s*1 # indicates a subpart
> \s+([0-9]+) # color
> (?:\s+[0-9]+){3} # coordinates
> (?:\s+[0-9]+){9} # 3 x 3 transform matrix
> \s+(\S+) # part name
> \s*$
> /x ) {
> # $1 = color
> # $2 = subpart name
> # etc...
> }
Whoops! I need to account for floating point values within the matrix.
m/
^
\s*1 # indicates a subpart
\s+([0-9]+) # color
(?:\s+[+-]?[0-9]+(?:\.[0-9]+)?){3} # coordinates
(?:\s+[+-]?[0-9]+(?:\.[0-9]+)?){9} # 3 x 3 transform matrix
\s+(\S+) # part name
\s*$
/x
Cheers,
- jsproat
--
Jeremy H. Sproat <jsproat@geocities.com>
http://www.geocities.com/SiliconValley/Horizon/5249/
Darth Maul Lives
|
|
Message has 1 Reply:
Message is in Reply To:
 | | regular expressions for DAT file subpart lines
|
| Hey Perl fans, What's your favorite regular expression for a subpart line (or any other line, for that matter) in an LDraw DAT file? Here's my entry; $linein is a single line from the DAT file, may or may not be padded with whitespace at the (...) (25 years ago, 22-Jun-99, to lugnet.off-topic.geek)
|
9 Messages in This Thread:
 
- Entire Thread on One Page:
- Nested:
All | Brief | Compact | Dots
Linear:
All | Brief | Compact
This Message and its Replies on One Page:
- Nested:
All | Brief | Compact | Dots
Linear:
All | Brief | Compact
|
|
|
|
