Changeset 38
- Timestamp:
- 12/22/07 18:52:37 (1 year ago)
- Files:
-
- trunk/dev-tools/update-loblaw-test.plx (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
trunk/dev-tools/update-loblaw-test.plx
r36 r38 230 230 or DieLog("unable to open $LOBLAW_LIST_FILE: $!"); 231 231 while (my $line = <FILE_LIST>) { 232 next if $line =~ /^\s*#/ ;232 next if $line =~ /^\s*#/ or $line =~ /^\s*$/; 233 233 unless ($line =~ 234 234 m%^\s*([/a-zA-Z0-9\-\.\_]+)\s+\=\>\s+/([/a-zA-Z0-9\-\.\_]+)\s*$%) {