Permalink
Browse files

oops that was a really bad check on my part

  • Loading branch information...
1 parent 411be3b commit 0c1b0997ba02a239e2d76e6e801e68262dead87e ben hengst committed Aug 16, 2009
Showing with 3 additions and 4 deletions.
  1. +3 −4 bin/stat
View
@@ -38,13 +38,12 @@ sub setup {
# now lets parse out what was passed to us via ARGV
foreach (@ARGV) {
+ $_ = sprintf( q{%03d}, $_ ) if looks_like_number($_) ;
if ($c->stash->{implementation}->{$_}) {
push @{$c->options->{implementation}}, $_;
}
- else {
- my $p = sprintf( q{%03d}, $_);
- push @{$c->options->{problem}}, $p
- if $c->stash->{problem}->{$p};
+ elsif ($c->stash->{problem}->{$_} ) {
+ push @{$c->options->{problem}}, $_;
}
}

0 comments on commit 0c1b099

Please sign in to comment.