unless $ARGV[2] works until someone passes a zero. You could amend it to   unless defined $ARGV[2] though   if 3 > @ARGV reads better, at least in my opinion.