($_ = lc <>), chomp for my ($dginput, $volinput);