Changeset 303 for obsdata/tags/0.3.2
- Timestamp:
- 11/21/06 17:28:12 (18 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
obsdata/tags/0.3.2/ObsData/Archive/Lha.pm
r285 r303 31 31 while (<$hlha>) { 32 32 chomp; 33 /^(\[ \w*\]|(-|d|l|c|b)((-|r)(-|w)(-|x)){3} [^-])/ or next;33 /^(\[.+\]|(-|d|l|c|b)((-|r)(-|w)(-|x)){3} [^-])/ or next; 34 34 /^.{51}(.*)$/; 35 35 push( @list, $1 );
Note: See TracChangeset
for help on using the changeset viewer.