Help for this page

Select Code to Download


  1. or download this
    if (my @m = $right =~ /^\d{2}(\d{2})(.*)/)
    #                      ^ Add this
    
  2. or download this
    $right =~ s/\s+//g;
    
  3. or download this
    $right =~ s/-$//;