Select Code to Download

sub random_string { 
   my $length_of_randomstring=shift;# the length of
...
    }
   return $random_string;
}