Help for this page

Select Code to Download


  1. or download this
    sub boldify
    {
    ...
        }
        return join '', @parts;
    }
    
  2. or download this
    my $test_data = <<INPUT;
    This is **bold**, but ``this is **not** bold``
    ...
    INPUT
    
    print boldify($test_data);
    
  3. or download this
    This is <b>bold<\b>, but this is **not** bold
    This is **not** bold, but this is <b>bold<\b>, and this is **not** bol
    +d
    This sure is <b>bold<\b> and so is <b>this<\b>, but **this** aint