Help for this page

Select Code to Download

Select or download this
```
#!/usr/bin/perl -w
#
...

    } 
}
```

Select or download this

Use of uninitialized value $switches[1] in join or string at morecurre
+nt.pl line 69, <STDIN> line 11 (#1)
Use of uninitialized value $switches[3] in join or string at morecurre
+nt.pl line 69, <STDIN> line 11 (#1)
...
Use of uninitialized value $modelselect in string ne at morecurrent.pl
+ line 19,
    <STDIN> line 11 (#1)