Changeset 540
- Timestamp:
- 07/04/11 21:24:24 (11 months ago)
- Files:
-
- 1 modified
Legend:
- Unmodified
- Added
- Removed
-
trunk/dbbuilder/src/org/bridgedb/extract/Ensembl_ETL_Device_v18_local.pl
r538 r540 264 264 $start_count = $start_count_default; 265 265 } 266 until ( $start_count =~ /^([1- 3]?\d?\d?\d?\d|40000)$/ ) {267 print "\n\nInvalid Entry!!!\nPlease type a number between 1 and 40000 --> ";266 until ( $start_count =~ /^([1-7]?\d?\d?\d?\d|80000)$/ ) { 267 print "\n\nInvalid Entry!!!\nPlease type a number between 1 and 80000 --> "; 268 268 $start_count = <STDIN>; 269 269 chomp $start_count;
