Help for this page

Select Code to Download


  1. or download this
    if($sorted_values=~/([abcdefghijklm]{2})/){

# Rest of code here

}
  2. or download this
        if (   $sorted_values =~ m/a{2}/
        or $sorted_values = ~m/b{2}/
...
        or $sorted_values = ~m/l{2}/
        or $sorted_values = ~m/k{2}/)
    {
  3. or download this
    my (@p2_hand,@p3_hand,@p4_hand,@p5_hand);
my (@p6_hand,@p7_hand,@p8_hand,@p9_hand,@p10_hand);