equal
deleted
inserted
replaced
23 $isRemoveDuplicates = 1; |
23 $isRemoveDuplicates = 1; |
24 } elsif ($arg eq '--split-by-domens'){ |
24 } elsif ($arg eq '--split-by-domens'){ |
25 $isSplitByDomens = 1; |
25 $isSplitByDomens = 1; |
26 } elsif ($arg =~ /--exclude-domen[=]{0,1}(\w*)/){ |
26 } elsif ($arg =~ /--exclude-domen[=]{0,1}(\w*)/){ |
27 $excludeDomen = $1; |
27 $excludeDomen = $1; |
|
28 illegalUse() if $excludeDomen ne '' && $arg !~ /--exclude-domen=\w*/; |
28 $excludeDomen = shift() if $excludeDomen eq ''; |
29 $excludeDomen = shift() if $excludeDomen eq ''; |
29 illegalUse() if $excludeDomen eq ''; |
30 illegalUse() if $excludeDomen eq ''; |
30 } else { |
31 } else { |
31 illegalUse(); |
32 illegalUse(); |
32 } |
33 } |