use LWP::Simple;
  my $source = get "http://$target/~$users[$i]";