foreach my $readLine (<PASSWD>) {