Help for this page

Select Code to Download


  1. or download this
    use String::Random;
    $foo = new String::Random;
    # e.g. AqF8, YcE2, BjW8 ...
    $string = $foo->randpattern("CcCn");
    
  2. or download this
    # define vowels
    $foo->{'V'} = [ qw(a e i o u) ];
    # define common consonants
    $foo->{'Q'} = [ qw(r s t n m) ];
    # e.g. retom, satan, timis ...
    $string = $foo->randpattern("QVQVQ");
    
  3. or download this
    # e.g.  342, 289, 832 ...
    print $foo->randregex('\d\d\d');