| # | Line 23 | Line 23 | while ($#ARGV >= 0) { | |
|---|---|---|
| 23 | $dosky = 0; | |
| 24 | } elsif ("$ARGV[0]" eq "-h") { | |
| 25 | $headout = 0; | |
| 26 | + | } else { |
| 27 | + | die "Unexpected command-line argument: $ARGV[0]\n"; |
| 28 | } | |
| 29 | shift @ARGV; | |
| 30 | } | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines (old) |
| > | Changed lines (new) |