Or you could try the lowtech approach.

my $prefix = "A guide to";
s/^$prefix (.*)/$1 - $prefix/i;
[download]

Makeshifts last the longest.