Select Code to Download

#!/usr/bin/perl
use strict; use warnings; use 5.010;

...
  $key = $az[rand @az] . $key;
  $cache{$key} = 1;
}

c
a
b
...
back to front!
sneezqsa
jicizzc