Select Code to Download

my $userid=getuserid or castigate_user;

sub get_userid {
  my $member_dir = "../../Members/";
...

  return $id;
}