while (<$f>) {
  chomp;
  system "rsh $_ quota report | mail $recip" and die "rsh failed: $!";
}