Help for this page

Select Code to Download


  1. or download this
    blah blah [click me](click me) more stuff
blah [link here](link here) blah blah
...
  2. or download this
    blah blah [click me](/click-me) more stuff
blah [link here](/link-here) blah blah
...
  3. or download this
    #!/usr/bin/env perl
use strict;
...
my $orig_part2 = $part2;
$part2 =~ s/ /-/g;
$text =~ s/\Q$part1$orig_part2\E/$part1$part2/g;
  4. or download this
    blah blah [click me](/click-me) more stuff
blah [link here](/link here) blah blah
  5. or download this
    my $text = "blah blah [click me](click me) more stuff\nblah [link here
+](link here) blah blah";
$text =~ s/(\[[^]]+]\()/$1\//g; # make links absolute
...
  $part2 =~ s/ /-/g;
  $text =~ s/\Q$part1$orig_part2\E/$part1$part2/g;
}