Select Code to Download

Select or download this

sub GeneratePassword {
@digit = ("A", "B", "C", "D", "E", "F", "G", "H", "J", "K", "L", "M", 
+"N", "P", "Q", "R", "S", "T", "U", "V", "W", "Y", "Z", "a", "b", "c",
+ "d", "e", "f", "g", "h", "j", "k", "m", "n", "p", "q", "r", "s", "t"
+, "u", "v", "w", "y", "z", "2", "3", "4", "5", "6", "7", "8", "9");
...
return($RandomPassword); 
}

Select or download this

sub get_cookie {
  local($chip, $val);
...
    $cookie{$chip} .= $val;
  }
} # end SR  NB - the other subroutines from this library [set-cookie, 
+split-cookie, delete-cookie] have not been included here.